Hệ thống quản lý thanh toán POS nhà hàng

• RPOS_DBDataSet.Designer.vb
• RBMSSC /
• project /

1 '------------------------------------------------------------------------------
2 ' <auto-generated>
3 ' This code was generated by a tool.
4 ' Runtime Version:4.0.30319.42000
5 '
6 ' Changes to this file may cause incorrect behavior and will be lost if
7 ' the code is regenerated.
8 ' </auto-generated>
9 '------------------------------------------------------------------------------
10
11 Option Strict Off
12 Option Explicit On
13
14
15
16 '''<summary>
17 '''Represents a strongly typed in-memory cache of data.
18 '''</summary>
19 <Global.System.Serializable(), _
20  Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
21  Global.System.ComponentModel.ToolboxItem(true), _
22  Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedDataSetSchema"), _
23  Global.System.Xml.Serialization.XmlRootAttribute("RPOS_DBDataSet"), _
24  Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.DataSet")> _
25 Partial Public Class RPOS_DBDataSet
26     Inherits Global.System.Data.DataSet
27     
28     Private tableActivation As ActivationDataTable
29     
30     Private tableCategory As CategoryDataTable
31     
32     Private tableDish As DishDataTable
33     
34     Private tableHotel As HotelDataTable
35     
36     Private tableInventoryType As InventoryTypeDataTable
37     
38     Private tableKitchen As KitchenDataTable
39     
40     Private tableKOTGeneration As KOTGenerationDataTable
41     
42     Private tableKOTGenerationItems As KOTGenerationItemsDataTable
43     
44     Private tableLogs As LogsDataTable
45     
46     Private tableNotesMaster As NotesMasterDataTable
47     
48     Private tablePOSGrouping As POSGroupingDataTable
49     
50     Private tablePOSPrinterSetting As POSPrinterSettingDataTable
51     
52     Private tableR_Table As R_TableDataTable
53     
54     Private tableRegistration As RegistrationDataTable
55     
56     Private tableRestaurantBillingInfo As RestaurantBillingInfoDataTable
57     
58     Private tableRestaurantBillingItems As RestaurantBillingItemsDataTable
59     
60     Private relationCategoryDish As Global.System.Data.DataRelation
61     
62     Private relationInventoryTypeDish As Global.System.Data.DataRelation
63     
64     Private relationKitchenDish As Global.System.Data.DataRelation
65     
66     Private relationR_TableKOTGeneration As Global.System.Data.DataRelation
67     
68     Private relationRegistrationKOTGeneration As Global.System.Data.DataRelation
69     
70     Private relationDishKOTGenerationItems As Global.System.Data.DataRelation
71     
72     Private relationKOTGenerationKOTGenerationItems As Global.System.Data.DataRelation
73     
74     Private relationRegistrationLogs As Global.System.Data.DataRelation
75     
76     Private relationInventoryTypeR_Table As Global.System.Data.DataRelation
77     
78     Private relationRegistrationRestaurantBillingInfo As Global.System.Data.DataRelation
79     
80     Private relationDishRestaurantBillingItems As Global.System.Data.DataRelation
81     
82     Private relationRestaurantBillingInfoRestaurantBillingItems As Global.System.Data.DataRelation
83     
84     Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
85     
86     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
87      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
88     Public Sub New()
89         MyBase.New
90         Me.BeginInit
91         Me.InitClass
92         Dim schemaChangedHandler As Global.System.ComponentModel.CollectionChangeEventHandler = AddressOf Me.SchemaChanged
93         AddHandler MyBase.Tables.CollectionChanged, schemaChangedHandler
94         AddHandler MyBase.Relations.CollectionChanged, schemaChangedHandler
95         Me.EndInit
96     End Sub
97     
98     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
99      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
100     Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
101         MyBase.New(info, context, false)
102         If (Me.IsBinarySerialized(info, context) = true) Then
103             Me.InitVars(false)
104             Dim schemaChangedHandler1 As Global.System.ComponentModel.CollectionChangeEventHandler = AddressOf Me.SchemaChanged
105             AddHandler Me.Tables.CollectionChanged, schemaChangedHandler1
106             AddHandler Me.Relations.CollectionChanged, schemaChangedHandler1
107             Return
108         End If
109         Dim strSchema As String = CType(info.GetValue("XmlSchema", GetType(String)),String)
110         If (Me.DetermineSchemaSerializationMode(info, context) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
111             Dim ds As Global.System.Data.DataSet = New Global.System.Data.DataSet()
112             ds.ReadXmlSchema(New Global.System.Xml.XmlTextReader(New Global.System.IO.StringReader(strSchema)))
113             If (Not (ds.Tables("Activation")) Is Nothing) Then
114                 MyBase.Tables.Add(New ActivationDataTable(ds.Tables("Activation")))
115             End If
116             If (Not (ds.Tables("Category")) Is Nothing) Then
117                 MyBase.Tables.Add(New CategoryDataTable(ds.Tables("Category")))
118             End If
119             If (Not (ds.Tables("Dish")) Is Nothing) Then
120                 MyBase.Tables.Add(New DishDataTable(ds.Tables("Dish")))
121             End If
122             If (Not (ds.Tables("Hotel")) Is Nothing) Then
123                 MyBase.Tables.Add(New HotelDataTable(ds.Tables("Hotel")))
124             End If
125             If (Not (ds.Tables("InventoryType")) Is Nothing) Then
126                 MyBase.Tables.Add(New InventoryTypeDataTable(ds.Tables("InventoryType")))
127             End If
128             If (Not (ds.Tables("Kitchen")) Is Nothing) Then
129                 MyBase.Tables.Add(New KitchenDataTable(ds.Tables("Kitchen")))
130             End If
131             If (Not (ds.Tables("KOTGeneration")) Is Nothing) Then
132                 MyBase.Tables.Add(New KOTGenerationDataTable(ds.Tables("KOTGeneration")))
133             End If
134             If (Not (ds.Tables("KOTGenerationItems")) Is Nothing) Then
135                 MyBase.Tables.Add(New KOTGenerationItemsDataTable(ds.Tables("KOTGenerationItems")))
136             End If
137             If (Not (ds.Tables("Logs")) Is Nothing) Then
138                 MyBase.Tables.Add(New LogsDataTable(ds.Tables("Logs")))
139             End If
140             If (Not (ds.Tables("NotesMaster")) Is Nothing) Then
141                 MyBase.Tables.Add(New NotesMasterDataTable(ds.Tables("NotesMaster")))
142             End If
143             If (Not (ds.Tables("POSGrouping")) Is Nothing) Then
144                 MyBase.Tables.Add(New POSGroupingDataTable(ds.Tables("POSGrouping")))
145             End If
146             If (Not (ds.Tables("POSPrinterSetting")) Is Nothing) Then
147                 MyBase.Tables.Add(New POSPrinterSettingDataTable(ds.Tables("POSPrinterSetting")))
148             End If
149             If (Not (ds.Tables("R_Table")) Is Nothing) Then
150                 MyBase.Tables.Add(New R_TableDataTable(ds.Tables("R_Table")))
151             End If
152             If (Not (ds.Tables("Registration")) Is Nothing) Then
153                 MyBase.Tables.Add(New RegistrationDataTable(ds.Tables("Registration")))
154             End If
155             If (Not (ds.Tables("RestaurantBillingInfo")) Is Nothing) Then
156                 MyBase.Tables.Add(New RestaurantBillingInfoDataTable(ds.Tables("RestaurantBillingInfo")))
157             End If
158             If (Not (ds.Tables("RestaurantBillingItems")) Is Nothing) Then
159                 MyBase.Tables.Add(New RestaurantBillingItemsDataTable(ds.Tables("RestaurantBillingItems")))
160             End If
161             Me.DataSetName = ds.DataSetName
162             Me.Prefix = ds.Prefix
163             Me.Namespace = ds.Namespace
164             Me.Locale = ds.Locale
165             Me.CaseSensitive = ds.CaseSensitive
166             Me.EnforceConstraints = ds.EnforceConstraints
167             Me.Merge(ds, false, Global.System.Data.MissingSchemaAction.Add)
168             Me.InitVars
169         Else
170             Me.ReadXmlSchema(New Global.System.Xml.XmlTextReader(New Global.System.IO.StringReader(strSchema)))
171         End If
172         Me.GetSerializationData(info, context)
173         Dim schemaChangedHandler As Global.System.ComponentModel.CollectionChangeEventHandler = AddressOf Me.SchemaChanged
174         AddHandler MyBase.Tables.CollectionChanged, schemaChangedHandler
175         AddHandler Me.Relations.CollectionChanged, schemaChangedHandler
176     End Sub
177     
178     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
179      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
180      Global.System.ComponentModel.Browsable(false), _
181      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
182     Public ReadOnly Property Activation() As ActivationDataTable
183         Get
184             Return Me.tableActivation
185         End Get
186     End Property
187     
188     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
189      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
190      Global.System.ComponentModel.Browsable(false), _
191      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
192     Public ReadOnly Property Category() As CategoryDataTable
193         Get
194             Return Me.tableCategory
195         End Get
196     End Property
197     
198     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
199      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
200      Global.System.ComponentModel.Browsable(false), _
201      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
202     Public ReadOnly Property Dish() As DishDataTable
203         Get
204             Return Me.tableDish
205         End Get
206     End Property
207     
208     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
209      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
210      Global.System.ComponentModel.Browsable(false), _
211      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
212     Public ReadOnly Property Hotel() As HotelDataTable
213         Get
214             Return Me.tableHotel
215         End Get
216     End Property
217     
218     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
219      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
220      Global.System.ComponentModel.Browsable(false), _
221      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
222     Public ReadOnly Property InventoryType() As InventoryTypeDataTable
223         Get
224             Return Me.tableInventoryType
225         End Get
226     End Property
227     
228     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
229      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
230      Global.System.ComponentModel.Browsable(false), _
231      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
232     Public ReadOnly Property Kitchen() As KitchenDataTable
233         Get
234             Return Me.tableKitchen
235         End Get
236     End Property
237     
238     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
239      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
240      Global.System.ComponentModel.Browsable(false), _
241      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
242     Public ReadOnly Property KOTGeneration() As KOTGenerationDataTable
243         Get
244             Return Me.tableKOTGeneration
245         End Get
246     End Property
247     
248     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
249      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
250      Global.System.ComponentModel.Browsable(false), _
251      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
252     Public ReadOnly Property KOTGenerationItems() As KOTGenerationItemsDataTable
253         Get
254             Return Me.tableKOTGenerationItems
255         End Get
256     End Property
257     
258     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
259      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
260      Global.System.ComponentModel.Browsable(false), _
261      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
262     Public ReadOnly Property Logs() As LogsDataTable
263         Get
264             Return Me.tableLogs
265         End Get
266     End Property
267     
268     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
269      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
270      Global.System.ComponentModel.Browsable(false), _
271      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
272     Public ReadOnly Property NotesMaster() As NotesMasterDataTable
273         Get
274             Return Me.tableNotesMaster
275         End Get
276     End Property
277     
278     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
279      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
280      Global.System.ComponentModel.Browsable(false), _
281      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
282     Public ReadOnly Property POSGrouping() As POSGroupingDataTable
283         Get
284             Return Me.tablePOSGrouping
285         End Get
286     End Property
287     
288     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
289      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
290      Global.System.ComponentModel.Browsable(false), _
291      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
292     Public ReadOnly Property POSPrinterSetting() As POSPrinterSettingDataTable
293         Get
294             Return Me.tablePOSPrinterSetting
295         End Get
296     End Property
297     
298     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
299      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
300      Global.System.ComponentModel.Browsable(false), _
301      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
302     Public ReadOnly Property R_Table() As R_TableDataTable
303         Get
304             Return Me.tableR_Table
305         End Get
306     End Property
307     
308     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
309      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
310      Global.System.ComponentModel.Browsable(false), _
311      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
312     Public ReadOnly Property Registration() As RegistrationDataTable
313         Get
314             Return Me.tableRegistration
315         End Get
316     End Property
317     
318     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
319      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
320      Global.System.ComponentModel.Browsable(false), _
321      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
322     Public ReadOnly Property RestaurantBillingInfo() As RestaurantBillingInfoDataTable
323         Get
324             Return Me.tableRestaurantBillingInfo
325         End Get
326     End Property
327     
328     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
329      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
330      Global.System.ComponentModel.Browsable(false), _
331      Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
332     Public ReadOnly Property RestaurantBillingItems() As RestaurantBillingItemsDataTable
333         Get
334             Return Me.tableRestaurantBillingItems
335         End Get
336     End Property
337     
338     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
339      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
340      Global.System.ComponentModel.BrowsableAttribute(true), _
341      Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)> _
342     Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode
343         Get
344             Return Me._schemaSerializationMode
345         End Get
346         Set
347             Me._schemaSerializationMode = value
348         End Set
349     End Property
350     
351     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
352      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
353      Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
354     Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection
355         Get
356             Return MyBase.Tables
357         End Get
358     End Property
359     
360     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
361      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
362      Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
363     Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection
364         Get
365             Return MyBase.Relations
366         End Get
367     End Property
368     
369     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
370      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
371     Protected Overrides Sub InitializeDerivedDataSet()
372         Me.BeginInit
373         Me.InitClass
374         Me.EndInit
375     End Sub
376     
377     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
378      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
379     Public Overrides Function Clone() As Global.System.Data.DataSet
380         Dim cln As RPOS_DBDataSet = CType(MyBase.Clone,RPOS_DBDataSet)
381         cln.InitVars
382         cln.SchemaSerializationMode = Me.SchemaSerializationMode
383         Return cln
384     End Function
385     
386     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
387      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
388     Protected Overrides Function ShouldSerializeTables() As Boolean
389         Return false
390     End Function
391     
392     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
393      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
394     Protected Overrides Function ShouldSerializeRelations() As Boolean
395         Return false
396     End Function
397     
398     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
399      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
400     Protected Overrides Sub ReadXmlSerializable(ByVal reader As Global.System.Xml.XmlReader)
401         If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
402             Me.Reset
403             Dim ds As Global.System.Data.DataSet = New Global.System.Data.DataSet()
404             ds.ReadXml(reader)
405             If (Not (ds.Tables("Activation")) Is Nothing) Then
406                 MyBase.Tables.Add(New ActivationDataTable(ds.Tables("Activation")))
407             End If
408             If (Not (ds.Tables("Category")) Is Nothing) Then
409                 MyBase.Tables.Add(New CategoryDataTable(ds.Tables("Category")))
410             End If
411             If (Not (ds.Tables("Dish")) Is Nothing) Then
412                 MyBase.Tables.Add(New DishDataTable(ds.Tables("Dish")))
413             End If
414             If (Not (ds.Tables("Hotel")) Is Nothing) Then
415                 MyBase.Tables.Add(New HotelDataTable(ds.Tables("Hotel")))
416             End If
417             If (Not (ds.Tables("InventoryType")) Is Nothing) Then
418                 MyBase.Tables.Add(New InventoryTypeDataTable(ds.Tables("InventoryType")))
419             End If
420             If (Not (ds.Tables("Kitchen")) Is Nothing) Then
421                 MyBase.Tables.Add(New KitchenDataTable(ds.Tables("Kitchen")))
422             End If
423             If (Not (ds.Tables("KOTGeneration")) Is Nothing) Then
424                 MyBase.Tables.Add(New KOTGenerationDataTable(ds.Tables("KOTGeneration")))
425             End If
426             If (Not (ds.Tables("KOTGenerationItems")) Is Nothing) Then
427                 MyBase.Tables.Add(New KOTGenerationItemsDataTable(ds.Tables("KOTGenerationItems")))
428             End If
429             If (Not (ds.Tables("Logs")) Is Nothing) Then
430                 MyBase.Tables.Add(New LogsDataTable(ds.Tables("Logs")))
431             End If
432             If (Not (ds.Tables("NotesMaster")) Is Nothing) Then
433                 MyBase.Tables.Add(New NotesMasterDataTable(ds.Tables("NotesMaster")))
434             End If
435             If (Not (ds.Tables("POSGrouping")) Is Nothing) Then
436                 MyBase.Tables.Add(New POSGroupingDataTable(ds.Tables("POSGrouping")))
437             End If
438             If (Not (ds.Tables("POSPrinterSetting")) Is Nothing) Then
439                 MyBase.Tables.Add(New POSPrinterSettingDataTable(ds.Tables("POSPrinterSetting")))
440             End If
441             If (Not (ds.Tables("R_Table")) Is Nothing) Then
442                 MyBase.Tables.Add(New R_TableDataTable(ds.Tables("R_Table")))
443             End If
444             If (Not (ds.Tables("Registration")) Is Nothing) Then
445                 MyBase.Tables.Add(New RegistrationDataTable(ds.Tables("Registration")))
446             End If
447             If (Not (ds.Tables("RestaurantBillingInfo")) Is Nothing) Then
448                 MyBase.Tables.Add(New RestaurantBillingInfoDataTable(ds.Tables("RestaurantBillingInfo")))
449             End If
450             If (Not (ds.Tables("RestaurantBillingItems")) Is Nothing) Then
451                 MyBase.Tables.Add(New RestaurantBillingItemsDataTable(ds.Tables("RestaurantBillingItems")))
452             End If
453             Me.DataSetName = ds.DataSetName
454             Me.Prefix = ds.Prefix
455             Me.Namespace = ds.Namespace
456             Me.Locale = ds.Locale
457             Me.CaseSensitive = ds.CaseSensitive
458             Me.EnforceConstraints = ds.EnforceConstraints
459             Me.Merge(ds, false, Global.System.Data.MissingSchemaAction.Add)
460             Me.InitVars
461         Else
462             Me.ReadXml(reader)
463             Me.InitVars
464         End If
465     End Sub
466     
467     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
468      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
469     Protected Overrides Function GetSchemaSerializable() As Global.System.Xml.Schema.XmlSchema
470         Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
471         Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing))
472         stream.Position = 0
473         Return Global.System.Xml.Schema.XmlSchema.Read(New Global.System.Xml.XmlTextReader(stream), Nothing)
474     End Function
475     
476     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
477      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
478     Friend Overloads Sub InitVars()
479         Me.InitVars(true)
480     End Sub
481     
482     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
483      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
484     Friend Overloads Sub InitVars(ByVal initTable As Boolean)
485         Me.tableActivation = CType(MyBase.Tables("Activation"),ActivationDataTable)
486         If (initTable = true) Then
487             If (Not (Me.tableActivation) Is Nothing) Then
488                 Me.tableActivation.InitVars
489             End If
490         End If
491         Me.tableCategory = CType(MyBase.Tables("Category"),CategoryDataTable)
492         If (initTable = true) Then
493             If (Not (Me.tableCategory) Is Nothing) Then
494                 Me.tableCategory.InitVars
495             End If
496         End If
497         Me.tableDish = CType(MyBase.Tables("Dish"),DishDataTable)
498         If (initTable = true) Then
499             If (Not (Me.tableDish) Is Nothing) Then
500                 Me.tableDish.InitVars
501             End If
502         End If
503         Me.tableHotel = CType(MyBase.Tables("Hotel"),HotelDataTable)
504         If (initTable = true) Then
505             If (Not (Me.tableHotel) Is Nothing) Then
506                 Me.tableHotel.InitVars
507             End If
508         End If
509         Me.tableInventoryType = CType(MyBase.Tables("InventoryType"),InventoryTypeDataTable)
510         If (initTable = true) Then
511             If (Not (Me.tableInventoryType) Is Nothing) Then
512                 Me.tableInventoryType.InitVars
513             End If
514         End If
515         Me.tableKitchen = CType(MyBase.Tables("Kitchen"),KitchenDataTable)
516         If (initTable = true) Then
517             If (Not (Me.tableKitchen) Is Nothing) Then
518                 Me.tableKitchen.InitVars
519             End If
520         End If
521         Me.tableKOTGeneration = CType(MyBase.Tables("KOTGeneration"),KOTGenerationDataTable)
522         If (initTable = true) Then
523             If (Not (Me.tableKOTGeneration) Is Nothing) Then
524                 Me.tableKOTGeneration.InitVars
525             End If
526         End If
527         Me.tableKOTGenerationItems = CType(MyBase.Tables("KOTGenerationItems"),KOTGenerationItemsDataTable)
528         If (initTable = true) Then
529             If (Not (Me.tableKOTGenerationItems) Is Nothing) Then
530                 Me.tableKOTGenerationItems.InitVars
531             End If
532         End If
533         Me.tableLogs = CType(MyBase.Tables("Logs"),LogsDataTable)
534         If (initTable = true) Then
535             If (Not (Me.tableLogs) Is Nothing) Then
536                 Me.tableLogs.InitVars
537             End If
538         End If
539         Me.tableNotesMaster = CType(MyBase.Tables("NotesMaster"),NotesMasterDataTable)
540         If (initTable = true) Then
541             If (Not (Me.tableNotesMaster) Is Nothing) Then
542                 Me.tableNotesMaster.InitVars
543             End If
544         End If
545         Me.tablePOSGrouping = CType(MyBase.Tables("POSGrouping"),POSGroupingDataTable)
546         If (initTable = true) Then
547             If (Not (Me.tablePOSGrouping) Is Nothing) Then
548                 Me.tablePOSGrouping.InitVars
549             End If
550         End If
551         Me.tablePOSPrinterSetting = CType(MyBase.Tables("POSPrinterSetting"),POSPrinterSettingDataTable)
552         If (initTable = true) Then
553             If (Not (Me.tablePOSPrinterSetting) Is Nothing) Then
554                 Me.tablePOSPrinterSetting.InitVars
555             End If
556         End If
557         Me.tableR_Table = CType(MyBase.Tables("R_Table"),R_TableDataTable)
558         If (initTable = true) Then
559             If (Not (Me.tableR_Table) Is Nothing) Then
560                 Me.tableR_Table.InitVars
561             End If
562         End If
563         Me.tableRegistration = CType(MyBase.Tables("Registration"),RegistrationDataTable)
564         If (initTable = true) Then
565             If (Not (Me.tableRegistration) Is Nothing) Then
566                 Me.tableRegistration.InitVars
567             End If
568         End If
569         Me.tableRestaurantBillingInfo = CType(MyBase.Tables("RestaurantBillingInfo"),RestaurantBillingInfoDataTable)
570         If (initTable = true) Then
571             If (Not (Me.tableRestaurantBillingInfo) Is Nothing) Then
572                 Me.tableRestaurantBillingInfo.InitVars
573             End If
574         End If
575         Me.tableRestaurantBillingItems = CType(MyBase.Tables("RestaurantBillingItems"),RestaurantBillingItemsDataTable)
576         If (initTable = true) Then
577             If (Not (Me.tableRestaurantBillingItems) Is Nothing) Then
578                 Me.tableRestaurantBillingItems.InitVars
579             End If
580         End If
581         Me.relationCategoryDish = Me.Relations("CategoryDish")
582         Me.relationInventoryTypeDish = Me.Relations("InventoryTypeDish")
583         Me.relationKitchenDish = Me.Relations("KitchenDish")
584         Me.relationR_TableKOTGeneration = Me.Relations("R_TableKOTGeneration")
585         Me.relationRegistrationKOTGeneration = Me.Relations("RegistrationKOTGeneration")
586         Me.relationDishKOTGenerationItems = Me.Relations("DishKOTGenerationItems")
587         Me.relationKOTGenerationKOTGenerationItems = Me.Relations("KOTGenerationKOTGenerationItems")
588         Me.relationRegistrationLogs = Me.Relations("RegistrationLogs")
589         Me.relationInventoryTypeR_Table = Me.Relations("InventoryTypeR_Table")
590         Me.relationRegistrationRestaurantBillingInfo = Me.Relations("RegistrationRestaurantBillingInfo")
591         Me.relationDishRestaurantBillingItems = Me.Relations("DishRestaurantBillingItems")
592         Me.relationRestaurantBillingInfoRestaurantBillingItems = Me.Relations("RestaurantBillingInfoRestaurantBillingItems")
593     End Sub
594     
595     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
596      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
597     Private Sub InitClass()
598         Me.DataSetName = "RPOS_DBDataSet"
599         Me.Prefix = ""
600         Me.Namespace = "http://tempuri.org/RPOS_DBDataSet.xsd"
601         Me.EnforceConstraints = true
602         Me.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
603         Me.tableActivation = New ActivationDataTable()
604         MyBase.Tables.Add(Me.tableActivation)
605         Me.tableCategory = New CategoryDataTable()
606         MyBase.Tables.Add(Me.tableCategory)
607         Me.tableDish = New DishDataTable()
608         MyBase.Tables.Add(Me.tableDish)
609         Me.tableHotel = New HotelDataTable()
610         MyBase.Tables.Add(Me.tableHotel)
611         Me.tableInventoryType = New InventoryTypeDataTable()
612         MyBase.Tables.Add(Me.tableInventoryType)
613         Me.tableKitchen = New KitchenDataTable()
614         MyBase.Tables.Add(Me.tableKitchen)
615         Me.tableKOTGeneration = New KOTGenerationDataTable()
616         MyBase.Tables.Add(Me.tableKOTGeneration)
617         Me.tableKOTGenerationItems = New KOTGenerationItemsDataTable()
618         MyBase.Tables.Add(Me.tableKOTGenerationItems)
619         Me.tableLogs = New LogsDataTable()
620         MyBase.Tables.Add(Me.tableLogs)
621         Me.tableNotesMaster = New NotesMasterDataTable()
622         MyBase.Tables.Add(Me.tableNotesMaster)
623         Me.tablePOSGrouping = New POSGroupingDataTable()
624         MyBase.Tables.Add(Me.tablePOSGrouping)
625         Me.tablePOSPrinterSetting = New POSPrinterSettingDataTable()
626         MyBase.Tables.Add(Me.tablePOSPrinterSetting)
627         Me.tableR_Table = New R_TableDataTable()
628         MyBase.Tables.Add(Me.tableR_Table)
629         Me.tableRegistration = New RegistrationDataTable()
630         MyBase.Tables.Add(Me.tableRegistration)
631         Me.tableRestaurantBillingInfo = New RestaurantBillingInfoDataTable()
632         MyBase.Tables.Add(Me.tableRestaurantBillingInfo)
633         Me.tableRestaurantBillingItems = New RestaurantBillingItemsDataTable()
634         MyBase.Tables.Add(Me.tableRestaurantBillingItems)
635         Me.relationCategoryDish = New Global.System.Data.DataRelation("CategoryDish", New Global.System.Data.DataColumn() {Me.tableCategory.CategoryNameColumn}, New Global.System.Data.DataColumn() {Me.tableDish.CategoryColumn}, false)
636         Me.Relations.Add(Me.relationCategoryDish)
637         Me.relationInventoryTypeDish = New Global.System.Data.DataRelation("InventoryTypeDish", New Global.System.Data.DataColumn() {Me.tableInventoryType.TypeColumn}, New Global.System.Data.DataColumn() {Me.tableDish.InventoryTypeColumn}, false)
638         Me.Relations.Add(Me.relationInventoryTypeDish)
639         Me.relationKitchenDish = New Global.System.Data.DataRelation("KitchenDish", New Global.System.Data.DataColumn() {Me.tableKitchen.KitchenNameColumn}, New Global.System.Data.DataColumn() {Me.tableDish.KitchenColumn}, false)
640         Me.Relations.Add(Me.relationKitchenDish)
641         Me.relationR_TableKOTGeneration = New Global.System.Data.DataRelation("R_TableKOTGeneration", New Global.System.Data.DataColumn() {Me.tableR_Table.TableNoColumn}, New Global.System.Data.DataColumn() {Me.tableKOTGeneration.TableNoColumn}, false)
642         Me.Relations.Add(Me.relationR_TableKOTGeneration)
643         Me.relationRegistrationKOTGeneration = New Global.System.Data.DataRelation("RegistrationKOTGeneration", New Global.System.Data.DataColumn() {Me.tableRegistration.UserIDColumn}, New Global.System.Data.DataColumn() {Me.tableKOTGeneration.OperatorIDColumn}, false)
644         Me.Relations.Add(Me.relationRegistrationKOTGeneration)
645         Me.relationDishKOTGenerationItems = New Global.System.Data.DataRelation("DishKOTGenerationItems", New Global.System.Data.DataColumn() {Me.tableDish.ItemIDColumn}, New Global.System.Data.DataColumn() {Me.tableKOTGenerationItems.Item_IDColumn}, false)
646         Me.Relations.Add(Me.relationDishKOTGenerationItems)
647         Me.relationKOTGenerationKOTGenerationItems = New Global.System.Data.DataRelation("KOTGenerationKOTGenerationItems", New Global.System.Data.DataColumn() {Me.tableKOTGeneration.TicketIDColumn}, New Global.System.Data.DataColumn() {Me.tableKOTGenerationItems.Ticket_IDColumn}, false)
648         Me.Relations.Add(Me.relationKOTGenerationKOTGenerationItems)
649         Me.relationRegistrationLogs = New Global.System.Data.DataRelation("RegistrationLogs", New Global.System.Data.DataColumn() {Me.tableRegistration.UserIDColumn}, New Global.System.Data.DataColumn() {Me.tableLogs.UserIDColumn}, false)
650         Me.Relations.Add(Me.relationRegistrationLogs)
651         Me.relationInventoryTypeR_Table = New Global.System.Data.DataRelation("InventoryTypeR_Table", New Global.System.Data.DataColumn() {Me.tableInventoryType.TypeColumn}, New Global.System.Data.DataColumn() {Me.tableR_Table.InventoryTypeColumn}, false)
652         Me.Relations.Add(Me.relationInventoryTypeR_Table)
653         Me.relationRegistrationRestaurantBillingInfo = New Global.System.Data.DataRelation("RegistrationRestaurantBillingInfo", New Global.System.Data.DataColumn() {Me.tableRegistration.UserIDColumn}, New Global.System.Data.DataColumn() {Me.tableRestaurantBillingInfo.OperatorIDColumn}, false)
654         Me.Relations.Add(Me.relationRegistrationRestaurantBillingInfo)
655         Me.relationDishRestaurantBillingItems = New Global.System.Data.DataRelation("DishRestaurantBillingItems", New Global.System.Data.DataColumn() {Me.tableDish.ItemIDColumn}, New Global.System.Data.DataColumn() {Me.tableRestaurantBillingItems.Item_IDColumn}, false)
656         Me.Relations.Add(Me.relationDishRestaurantBillingItems)
657         Me.relationRestaurantBillingInfoRestaurantBillingItems = New Global.System.Data.DataRelation("RestaurantBillingInfoRestaurantBillingItems", New Global.System.Data.DataColumn() {Me.tableRestaurantBillingInfo.BillIdColumn}, New Global.System.Data.DataColumn() {Me.tableRestaurantBillingItems.B_IDColumn}, false)
658         Me.Relations.Add(Me.relationRestaurantBillingInfoRestaurantBillingItems)
659     End Sub
660     
661     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
662      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
663     Private Function ShouldSerializeActivation() As Boolean
664         Return false
665     End Function
666     
667     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
668      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
669     Private Function ShouldSerializeCategory() As Boolean
670         Return false
671     End Function
672     
673     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
674      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
675     Private Function ShouldSerializeDish() As Boolean
676         Return false
677     End Function
678     
679     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
680      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
681     Private Function ShouldSerializeHotel() As Boolean
682         Return false
683     End Function
684     
685     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
686      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
687     Private Function ShouldSerializeInventoryType() As Boolean
688         Return false
689     End Function
690     
691     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
692      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
693     Private Function ShouldSerializeKitchen() As Boolean
694         Return false
695     End Function
696     
697     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
698      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
699     Private Function ShouldSerializeKOTGeneration() As Boolean
700         Return false
701     End Function
702     
703     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
704      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
705     Private Function ShouldSerializeKOTGenerationItems() As Boolean
706         Return false
707     End Function
708     
709     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
710      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
711     Private Function ShouldSerializeLogs() As Boolean
712         Return false
713     End Function
714     
715     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
716      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
717     Private Function ShouldSerializeNotesMaster() As Boolean
718         Return false
719     End Function
720     
721     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
722      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
723     Private Function ShouldSerializePOSGrouping() As Boolean
724         Return false
725     End Function
726     
727     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
728      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
729     Private Function ShouldSerializePOSPrinterSetting() As Boolean
730         Return false
731     End Function
732     
733     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
734      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
735     Private Function ShouldSerializeR_Table() As Boolean
736         Return false
737     End Function
738     
739     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
740      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
741     Private Function ShouldSerializeRegistration() As Boolean
742         Return false
743     End Function
744     
745     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
746      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
747     Private Function ShouldSerializeRestaurantBillingInfo() As Boolean
748         Return false
749     End Function
750     
751     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
752      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
753     Private Function ShouldSerializeRestaurantBillingItems() As Boolean
754         Return false
755     End Function
756     
757     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
758      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
759     Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs)
760         If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then
761             Me.InitVars
762         End If
763     End Sub
764     
765     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
766      Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
767     Public Shared Function GetTypedDataSetSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
768         Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
769         Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
770         Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
771         Dim any As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
772         any.Namespace = ds.Namespace
773         sequence.Items.Add(any)
774         type.Particle = sequence
775         Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
776         If xs.Contains(dsSchema.TargetNamespace) Then
777             Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
778             Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
779             Try
780                 Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
781                 dsSchema.Write(s1)
782                 Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
783                 Do While schemas.MoveNext
784                     schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
785                     s2.SetLength(0)
786                     schema.Write(s2)
787                     If (s1.Length = s2.Length) Then
788                         s1.Position = 0
789                         s2.Position = 0
790                         
791                         Do While ((s1.Position <> s1.Length) _
792                                     AndAlso (s1.ReadByte = s2.ReadByte))
793                             
794                             
795                         Loop
796                         If (s1.Position = s1.Length) Then
797                             Return type
798                         End If
799                     End If
800                     
801                 Loop
802             Finally
803                 If (Not (s1) Is Nothing) Then
804                     s1.Close
805                 End If
806                 If (Not (s2) Is Nothing) Then
807                     s2.Close
808                 End If
809             End Try
810         End If
811         xs.Add(dsSchema)
812         Return type
813     End Function
814     
815     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
816     Public Delegate Sub ActivationRowChangeEventHandler(ByVal sender As Object, ByVal e As ActivationRowChangeEvent)
817     
818     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
819     Public Delegate Sub CategoryRowChangeEventHandler(ByVal sender As Object, ByVal e As CategoryRowChangeEvent)
820     
821     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
822     Public Delegate Sub DishRowChangeEventHandler(ByVal sender As Object, ByVal e As DishRowChangeEvent)
823     
824     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
825     Public Delegate Sub HotelRowChangeEventHandler(ByVal sender As Object, ByVal e As HotelRowChangeEvent)
826     
827     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
828     Public Delegate Sub InventoryTypeRowChangeEventHandler(ByVal sender As Object, ByVal e As InventoryTypeRowChangeEvent)
829     
830     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
831     Public Delegate Sub KitchenRowChangeEventHandler(ByVal sender As Object, ByVal e As KitchenRowChangeEvent)
832     
833     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
834     Public Delegate Sub KOTGenerationRowChangeEventHandler(ByVal sender As Object, ByVal e As KOTGenerationRowChangeEvent)
835     
836     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
837     Public Delegate Sub KOTGenerationItemsRowChangeEventHandler(ByVal sender As Object, ByVal e As KOTGenerationItemsRowChangeEvent)
838     
839     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
840     Public Delegate Sub LogsRowChangeEventHandler(ByVal sender As Object, ByVal e As LogsRowChangeEvent)
841     
842     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
843     Public Delegate Sub NotesMasterRowChangeEventHandler(ByVal sender As Object, ByVal e As NotesMasterRowChangeEvent)
844     
845     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
846     Public Delegate Sub POSGroupingRowChangeEventHandler(ByVal sender As Object, ByVal e As POSGroupingRowChangeEvent)
847     
848     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
849     Public Delegate Sub POSPrinterSettingRowChangeEventHandler(ByVal sender As Object, ByVal e As POSPrinterSettingRowChangeEvent)
850     
851     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
852     Public Delegate Sub R_TableRowChangeEventHandler(ByVal sender As Object, ByVal e As R_TableRowChangeEvent)
853     
854     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
855     Public Delegate Sub RegistrationRowChangeEventHandler(ByVal sender As Object, ByVal e As RegistrationRowChangeEvent)
856     
857     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
858     Public Delegate Sub RestaurantBillingInfoRowChangeEventHandler(ByVal sender As Object, ByVal e As RestaurantBillingInfoRowChangeEvent)
859     
860     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
861     Public Delegate Sub RestaurantBillingItemsRowChangeEventHandler(ByVal sender As Object, ByVal e As RestaurantBillingItemsRowChangeEvent)
862     
863     '''<summary>
864     '''Represents the strongly named DataTable class.
865     '''</summary>
866     <Global.System.Serializable(), _
867      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
868     Partial Public Class ActivationDataTable
869         Inherits Global.System.Data.TypedTableBase(Of ActivationRow)
870         
871         Private columnId As Global.System.Data.DataColumn
872         
873         Private columnHardwareID As Global.System.Data.DataColumn
874         
875         Private columnActivationID As Global.System.Data.DataColumn
876         
877         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
878          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
879         Public Sub New()
880             MyBase.New
881             Me.TableName = "Activation"
882             Me.BeginInit
883             Me.InitClass
884             Me.EndInit
885         End Sub
886         
887         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
888          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
889         Friend Sub New(ByVal table As Global.System.Data.DataTable)
890             MyBase.New
891             Me.TableName = table.TableName
892             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
893                 Me.CaseSensitive = table.CaseSensitive
894             End If
895             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
896                 Me.Locale = table.Locale
897             End If
898             If (table.Namespace <> table.DataSet.Namespace) Then
899                 Me.Namespace = table.Namespace
900             End If
901             Me.Prefix = table.Prefix
902             Me.MinimumCapacity = table.MinimumCapacity
903         End Sub
904         
905         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
906          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
907         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
908             MyBase.New(info, context)
909             Me.InitVars
910         End Sub
911         
912         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
913          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
914         Public ReadOnly Property IdColumn() As Global.System.Data.DataColumn
915             Get
916                 Return Me.columnId
917             End Get
918         End Property
919         
920         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
921          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
922         Public ReadOnly Property HardwareIDColumn() As Global.System.Data.DataColumn
923             Get
924                 Return Me.columnHardwareID
925             End Get
926         End Property
927         
928         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
929          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
930         Public ReadOnly Property ActivationIDColumn() As Global.System.Data.DataColumn
931             Get
932                 Return Me.columnActivationID
933             End Get
934         End Property
935         
936         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
937          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
938          Global.System.ComponentModel.Browsable(false)> _
939         Public ReadOnly Property Count() As Integer
940             Get
941                 Return Me.Rows.Count
942             End Get
943         End Property
944         
945         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
946          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
947         Public Default ReadOnly Property Item(ByVal index As Integer) As ActivationRow
948             Get
949                 Return CType(Me.Rows(index),ActivationRow)
950             End Get
951         End Property
952         
953         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
954         Public Event ActivationRowChanging As ActivationRowChangeEventHandler
955         
956         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
957         Public Event ActivationRowChanged As ActivationRowChangeEventHandler
958         
959         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
960         Public Event ActivationRowDeleting As ActivationRowChangeEventHandler
961         
962         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
963         Public Event ActivationRowDeleted As ActivationRowChangeEventHandler
964         
965         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
966          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
967         Public Overloads Sub AddActivationRow(ByVal row As ActivationRow)
968             Me.Rows.Add(row)
969         End Sub
970         
971         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
972          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
973         Public Overloads Function AddActivationRow(ByVal HardwareID As String, ByVal ActivationID As String) As ActivationRow
974             Dim rowActivationRow As ActivationRow = CType(Me.NewRow,ActivationRow)
975             Dim columnValuesArray() As Object = New Object() {Nothing, HardwareID, ActivationID}
976             rowActivationRow.ItemArray = columnValuesArray
977             Me.Rows.Add(rowActivationRow)
978             Return rowActivationRow
979         End Function
980         
981         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
982          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
983         Public Function FindById(ByVal Id As Integer) As ActivationRow
984             Return CType(Me.Rows.Find(New Object() {Id}),ActivationRow)
985         End Function
986         
987         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
988          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
989         Public Overrides Function Clone() As Global.System.Data.DataTable
990             Dim cln As ActivationDataTable = CType(MyBase.Clone,ActivationDataTable)
991             cln.InitVars
992             Return cln
993         End Function
994         
995         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
996          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
997         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
998             Return New ActivationDataTable()
999         End Function
1000         
1001         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1002          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1003         Friend Sub InitVars()
1004             Me.columnId = MyBase.Columns("Id")
1005             Me.columnHardwareID = MyBase.Columns("HardwareID")
1006             Me.columnActivationID = MyBase.Columns("ActivationID")
1007         End Sub
1008         
1009         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1010          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1011         Private Sub InitClass()
1012             Me.columnId = New Global.System.Data.DataColumn("Id", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
1013             MyBase.Columns.Add(Me.columnId)
1014             Me.columnHardwareID = New Global.System.Data.DataColumn("HardwareID", GetType(String), Nothing, Global.System.Data.MappingType.Element)
1015             MyBase.Columns.Add(Me.columnHardwareID)
1016             Me.columnActivationID = New Global.System.Data.DataColumn("ActivationID", GetType(String), Nothing, Global.System.Data.MappingType.Element)
1017             MyBase.Columns.Add(Me.columnActivationID)
1018             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnId}, true))
1019             Me.columnId.AutoIncrement = true
1020             Me.columnId.AutoIncrementSeed = -1
1021             Me.columnId.AutoIncrementStep = -1
1022             Me.columnId.AllowDBNull = false
1023             Me.columnId.Unique = true
1024             Me.columnHardwareID.MaxLength = 255
1025             Me.columnActivationID.MaxLength = 255
1026         End Sub
1027         
1028         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1029          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1030         Public Function NewActivationRow() As ActivationRow
1031             Return CType(Me.NewRow,ActivationRow)
1032         End Function
1033         
1034         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1035          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1036         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
1037             Return New ActivationRow(builder)
1038         End Function
1039         
1040         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1041          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1042         Protected Overrides Function GetRowType() As Global.System.Type
1043             Return GetType(ActivationRow)
1044         End Function
1045         
1046         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1047          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1048         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1049             MyBase.OnRowChanged(e)
1050             If (Not (Me.ActivationRowChangedEvent) Is Nothing) Then
1051                 RaiseEvent ActivationRowChanged(Me, New ActivationRowChangeEvent(CType(e.Row,ActivationRow), e.Action))
1052             End If
1053         End Sub
1054         
1055         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1056          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1057         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1058             MyBase.OnRowChanging(e)
1059             If (Not (Me.ActivationRowChangingEvent) Is Nothing) Then
1060                 RaiseEvent ActivationRowChanging(Me, New ActivationRowChangeEvent(CType(e.Row,ActivationRow), e.Action))
1061             End If
1062         End Sub
1063         
1064         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1065          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1066         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1067             MyBase.OnRowDeleted(e)
1068             If (Not (Me.ActivationRowDeletedEvent) Is Nothing) Then
1069                 RaiseEvent ActivationRowDeleted(Me, New ActivationRowChangeEvent(CType(e.Row,ActivationRow), e.Action))
1070             End If
1071         End Sub
1072         
1073         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1074          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1075         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1076             MyBase.OnRowDeleting(e)
1077             If (Not (Me.ActivationRowDeletingEvent) Is Nothing) Then
1078                 RaiseEvent ActivationRowDeleting(Me, New ActivationRowChangeEvent(CType(e.Row,ActivationRow), e.Action))
1079             End If
1080         End Sub
1081         
1082         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1083          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1084         Public Sub RemoveActivationRow(ByVal row As ActivationRow)
1085             Me.Rows.Remove(row)
1086         End Sub
1087         
1088         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1089          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1090         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
1091             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
1092             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
1093             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
1094             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
1095             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
1096             any1.MinOccurs = New Decimal(0)
1097             any1.MaxOccurs = Decimal.MaxValue
1098             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
1099             sequence.Items.Add(any1)
1100             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
1101             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
1102             any2.MinOccurs = New Decimal(1)
1103             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
1104             sequence.Items.Add(any2)
1105             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
1106             attribute1.Name = "namespace"
1107             attribute1.FixedValue = ds.Namespace
1108             type.Attributes.Add(attribute1)
1109             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
1110             attribute2.Name = "tableTypeName"
1111             attribute2.FixedValue = "ActivationDataTable"
1112             type.Attributes.Add(attribute2)
1113             type.Particle = sequence
1114             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
1115             If xs.Contains(dsSchema.TargetNamespace) Then
1116                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
1117                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
1118                 Try
1119                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
1120                     dsSchema.Write(s1)
1121                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
1122                     Do While schemas.MoveNext
1123                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
1124                         s2.SetLength(0)
1125                         schema.Write(s2)
1126                         If (s1.Length = s2.Length) Then
1127                             s1.Position = 0
1128                             s2.Position = 0
1129                             
1130                             Do While ((s1.Position <> s1.Length) _
1131                                         AndAlso (s1.ReadByte = s2.ReadByte))
1132                                 
1133                                 
1134                             Loop
1135                             If (s1.Position = s1.Length) Then
1136                                 Return type
1137                             End If
1138                         End If
1139                         
1140                     Loop
1141                 Finally
1142                     If (Not (s1) Is Nothing) Then
1143                         s1.Close
1144                     End If
1145                     If (Not (s2) Is Nothing) Then
1146                         s2.Close
1147                     End If
1148                 End Try
1149             End If
1150             xs.Add(dsSchema)
1151             Return type
1152         End Function
1153     End Class
1154     
1155     '''<summary>
1156     '''Represents the strongly named DataTable class.
1157     '''</summary>
1158     <Global.System.Serializable(), _
1159      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
1160     Partial Public Class CategoryDataTable
1161         Inherits Global.System.Data.TypedTableBase(Of CategoryRow)
1162         
1163         Private columnCategoryName As Global.System.Data.DataColumn
1164         
1165         Private columnVAT As Global.System.Data.DataColumn
1166         
1167         Private columnST As Global.System.Data.DataColumn
1168         
1169         Private columnSC As Global.System.Data.DataColumn
1170         
1171         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1172          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1173         Public Sub New()
1174             MyBase.New
1175             Me.TableName = "Category"
1176             Me.BeginInit
1177             Me.InitClass
1178             Me.EndInit
1179         End Sub
1180         
1181         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1182          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1183         Friend Sub New(ByVal table As Global.System.Data.DataTable)
1184             MyBase.New
1185             Me.TableName = table.TableName
1186             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
1187                 Me.CaseSensitive = table.CaseSensitive
1188             End If
1189             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
1190                 Me.Locale = table.Locale
1191             End If
1192             If (table.Namespace <> table.DataSet.Namespace) Then
1193                 Me.Namespace = table.Namespace
1194             End If
1195             Me.Prefix = table.Prefix
1196             Me.MinimumCapacity = table.MinimumCapacity
1197         End Sub
1198         
1199         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1200          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1201         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
1202             MyBase.New(info, context)
1203             Me.InitVars
1204         End Sub
1205         
1206         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1207          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1208         Public ReadOnly Property CategoryNameColumn() As Global.System.Data.DataColumn
1209             Get
1210                 Return Me.columnCategoryName
1211             End Get
1212         End Property
1213         
1214         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1215          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1216         Public ReadOnly Property VATColumn() As Global.System.Data.DataColumn
1217             Get
1218                 Return Me.columnVAT
1219             End Get
1220         End Property
1221         
1222         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1223          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1224         Public ReadOnly Property STColumn() As Global.System.Data.DataColumn
1225             Get
1226                 Return Me.columnST
1227             End Get
1228         End Property
1229         
1230         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1231          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1232         Public ReadOnly Property SCColumn() As Global.System.Data.DataColumn
1233             Get
1234                 Return Me.columnSC
1235             End Get
1236         End Property
1237         
1238         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1239          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
1240          Global.System.ComponentModel.Browsable(false)> _
1241         Public ReadOnly Property Count() As Integer
1242             Get
1243                 Return Me.Rows.Count
1244             End Get
1245         End Property
1246         
1247         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1248          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1249         Public Default ReadOnly Property Item(ByVal index As Integer) As CategoryRow
1250             Get
1251                 Return CType(Me.Rows(index),CategoryRow)
1252             End Get
1253         End Property
1254         
1255         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1256         Public Event CategoryRowChanging As CategoryRowChangeEventHandler
1257         
1258         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1259         Public Event CategoryRowChanged As CategoryRowChangeEventHandler
1260         
1261         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1262         Public Event CategoryRowDeleting As CategoryRowChangeEventHandler
1263         
1264         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1265         Public Event CategoryRowDeleted As CategoryRowChangeEventHandler
1266         
1267         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1268          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1269         Public Overloads Sub AddCategoryRow(ByVal row As CategoryRow)
1270             Me.Rows.Add(row)
1271         End Sub
1272         
1273         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1274          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1275         Public Overloads Function AddCategoryRow(ByVal CategoryName As String, ByVal VAT As Decimal, ByVal ST As Decimal, ByVal SC As Decimal) As CategoryRow
1276             Dim rowCategoryRow As CategoryRow = CType(Me.NewRow,CategoryRow)
1277             Dim columnValuesArray() As Object = New Object() {CategoryName, VAT, ST, SC}
1278             rowCategoryRow.ItemArray = columnValuesArray
1279             Me.Rows.Add(rowCategoryRow)
1280             Return rowCategoryRow
1281         End Function
1282         
1283         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1284          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1285         Public Function FindByCategoryName(ByVal CategoryName As String) As CategoryRow
1286             Return CType(Me.Rows.Find(New Object() {CategoryName}),CategoryRow)
1287         End Function
1288         
1289         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1290          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1291         Public Overrides Function Clone() As Global.System.Data.DataTable
1292             Dim cln As CategoryDataTable = CType(MyBase.Clone,CategoryDataTable)
1293             cln.InitVars
1294             Return cln
1295         End Function
1296         
1297         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1298          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1299         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
1300             Return New CategoryDataTable()
1301         End Function
1302         
1303         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1304          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1305         Friend Sub InitVars()
1306             Me.columnCategoryName = MyBase.Columns("CategoryName")
1307             Me.columnVAT = MyBase.Columns("VAT")
1308             Me.columnST = MyBase.Columns("ST")
1309             Me.columnSC = MyBase.Columns("SC")
1310         End Sub
1311         
1312         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1313          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1314         Private Sub InitClass()
1315             Me.columnCategoryName = New Global.System.Data.DataColumn("CategoryName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
1316             MyBase.Columns.Add(Me.columnCategoryName)
1317             Me.columnVAT = New Global.System.Data.DataColumn("VAT", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
1318             MyBase.Columns.Add(Me.columnVAT)
1319             Me.columnST = New Global.System.Data.DataColumn("ST", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
1320             MyBase.Columns.Add(Me.columnST)
1321             Me.columnSC = New Global.System.Data.DataColumn("SC", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
1322             MyBase.Columns.Add(Me.columnSC)
1323             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnCategoryName}, true))
1324             Me.columnCategoryName.AllowDBNull = false
1325             Me.columnCategoryName.Unique = true
1326             Me.columnCategoryName.MaxLength = 255
1327         End Sub
1328         
1329         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1330          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1331         Public Function NewCategoryRow() As CategoryRow
1332             Return CType(Me.NewRow,CategoryRow)
1333         End Function
1334         
1335         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1336          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1337         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
1338             Return New CategoryRow(builder)
1339         End Function
1340         
1341         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1342          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1343         Protected Overrides Function GetRowType() As Global.System.Type
1344             Return GetType(CategoryRow)
1345         End Function
1346         
1347         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1348          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1349         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1350             MyBase.OnRowChanged(e)
1351             If (Not (Me.CategoryRowChangedEvent) Is Nothing) Then
1352                 RaiseEvent CategoryRowChanged(Me, New CategoryRowChangeEvent(CType(e.Row,CategoryRow), e.Action))
1353             End If
1354         End Sub
1355         
1356         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1357          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1358         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1359             MyBase.OnRowChanging(e)
1360             If (Not (Me.CategoryRowChangingEvent) Is Nothing) Then
1361                 RaiseEvent CategoryRowChanging(Me, New CategoryRowChangeEvent(CType(e.Row,CategoryRow), e.Action))
1362             End If
1363         End Sub
1364         
1365         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1366          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1367         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1368             MyBase.OnRowDeleted(e)
1369             If (Not (Me.CategoryRowDeletedEvent) Is Nothing) Then
1370                 RaiseEvent CategoryRowDeleted(Me, New CategoryRowChangeEvent(CType(e.Row,CategoryRow), e.Action))
1371             End If
1372         End Sub
1373         
1374         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1375          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1376         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1377             MyBase.OnRowDeleting(e)
1378             If (Not (Me.CategoryRowDeletingEvent) Is Nothing) Then
1379                 RaiseEvent CategoryRowDeleting(Me, New CategoryRowChangeEvent(CType(e.Row,CategoryRow), e.Action))
1380             End If
1381         End Sub
1382         
1383         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1384          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1385         Public Sub RemoveCategoryRow(ByVal row As CategoryRow)
1386             Me.Rows.Remove(row)
1387         End Sub
1388         
1389         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1390          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1391         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
1392             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
1393             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
1394             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
1395             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
1396             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
1397             any1.MinOccurs = New Decimal(0)
1398             any1.MaxOccurs = Decimal.MaxValue
1399             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
1400             sequence.Items.Add(any1)
1401             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
1402             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
1403             any2.MinOccurs = New Decimal(1)
1404             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
1405             sequence.Items.Add(any2)
1406             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
1407             attribute1.Name = "namespace"
1408             attribute1.FixedValue = ds.Namespace
1409             type.Attributes.Add(attribute1)
1410             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
1411             attribute2.Name = "tableTypeName"
1412             attribute2.FixedValue = "CategoryDataTable"
1413             type.Attributes.Add(attribute2)
1414             type.Particle = sequence
1415             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
1416             If xs.Contains(dsSchema.TargetNamespace) Then
1417                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
1418                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
1419                 Try
1420                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
1421                     dsSchema.Write(s1)
1422                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
1423                     Do While schemas.MoveNext
1424                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
1425                         s2.SetLength(0)
1426                         schema.Write(s2)
1427                         If (s1.Length = s2.Length) Then
1428                             s1.Position = 0
1429                             s2.Position = 0
1430                             
1431                             Do While ((s1.Position <> s1.Length) _
1432                                         AndAlso (s1.ReadByte = s2.ReadByte))
1433                                 
1434                                 
1435                             Loop
1436                             If (s1.Position = s1.Length) Then
1437                                 Return type
1438                             End If
1439                         End If
1440                         
1441                     Loop
1442                 Finally
1443                     If (Not (s1) Is Nothing) Then
1444                         s1.Close
1445                     End If
1446                     If (Not (s2) Is Nothing) Then
1447                         s2.Close
1448                     End If
1449                 End Try
1450             End If
1451             xs.Add(dsSchema)
1452             Return type
1453         End Function
1454     End Class
1455     
1456     '''<summary>
1457     '''Represents the strongly named DataTable class.
1458     '''</summary>
1459     <Global.System.Serializable(), _
1460      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
1461     Partial Public Class DishDataTable
1462         Inherits Global.System.Data.TypedTableBase(Of DishRow)
1463         
1464         Private columnItemID As Global.System.Data.DataColumn
1465         
1466         Private columnDishname As Global.System.Data.DataColumn
1467         
1468         Private columnCategory As Global.System.Data.DataColumn
1469         
1470         Private columnKitchen As Global.System.Data.DataColumn
1471         
1472         Private columnInventoryType As Global.System.Data.DataColumn
1473         
1474         Private columnRate As Global.System.Data.DataColumn
1475         
1476         Private columnDiscount As Global.System.Data.DataColumn
1477         
1478         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1479          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1480         Public Sub New()
1481             MyBase.New
1482             Me.TableName = "Dish"
1483             Me.BeginInit
1484             Me.InitClass
1485             Me.EndInit
1486         End Sub
1487         
1488         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1489          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1490         Friend Sub New(ByVal table As Global.System.Data.DataTable)
1491             MyBase.New
1492             Me.TableName = table.TableName
1493             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
1494                 Me.CaseSensitive = table.CaseSensitive
1495             End If
1496             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
1497                 Me.Locale = table.Locale
1498             End If
1499             If (table.Namespace <> table.DataSet.Namespace) Then
1500                 Me.Namespace = table.Namespace
1501             End If
1502             Me.Prefix = table.Prefix
1503             Me.MinimumCapacity = table.MinimumCapacity
1504         End Sub
1505         
1506         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1507          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1508         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
1509             MyBase.New(info, context)
1510             Me.InitVars
1511         End Sub
1512         
1513         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1514          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1515         Public ReadOnly Property ItemIDColumn() As Global.System.Data.DataColumn
1516             Get
1517                 Return Me.columnItemID
1518             End Get
1519         End Property
1520         
1521         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1522          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1523         Public ReadOnly Property DishnameColumn() As Global.System.Data.DataColumn
1524             Get
1525                 Return Me.columnDishname
1526             End Get
1527         End Property
1528         
1529         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1530          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1531         Public ReadOnly Property CategoryColumn() As Global.System.Data.DataColumn
1532             Get
1533                 Return Me.columnCategory
1534             End Get
1535         End Property
1536         
1537         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1538          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1539         Public ReadOnly Property KitchenColumn() As Global.System.Data.DataColumn
1540             Get
1541                 Return Me.columnKitchen
1542             End Get
1543         End Property
1544         
1545         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1546          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1547         Public ReadOnly Property InventoryTypeColumn() As Global.System.Data.DataColumn
1548             Get
1549                 Return Me.columnInventoryType
1550             End Get
1551         End Property
1552         
1553         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1554          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1555         Public ReadOnly Property RateColumn() As Global.System.Data.DataColumn
1556             Get
1557                 Return Me.columnRate
1558             End Get
1559         End Property
1560         
1561         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1562          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1563         Public ReadOnly Property DiscountColumn() As Global.System.Data.DataColumn
1564             Get
1565                 Return Me.columnDiscount
1566             End Get
1567         End Property
1568         
1569         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1570          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
1571          Global.System.ComponentModel.Browsable(false)> _
1572         Public ReadOnly Property Count() As Integer
1573             Get
1574                 Return Me.Rows.Count
1575             End Get
1576         End Property
1577         
1578         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1579          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1580         Public Default ReadOnly Property Item(ByVal index As Integer) As DishRow
1581             Get
1582                 Return CType(Me.Rows(index),DishRow)
1583             End Get
1584         End Property
1585         
1586         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1587         Public Event DishRowChanging As DishRowChangeEventHandler
1588         
1589         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1590         Public Event DishRowChanged As DishRowChangeEventHandler
1591         
1592         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1593         Public Event DishRowDeleting As DishRowChangeEventHandler
1594         
1595         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1596         Public Event DishRowDeleted As DishRowChangeEventHandler
1597         
1598         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1599          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1600         Public Overloads Sub AddDishRow(ByVal row As DishRow)
1601             Me.Rows.Add(row)
1602         End Sub
1603         
1604         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1605          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1606         Public Overloads Function AddDishRow(ByVal ItemID As Integer, ByVal Dishname As String, ByVal parentCategoryRowByCategoryDish As CategoryRow, ByVal parentKitchenRowByKitchenDish As KitchenRow, ByVal parentInventoryTypeRowByInventoryTypeDish As InventoryTypeRow, ByVal Rate As Decimal, ByVal Discount As Decimal) As DishRow
1607             Dim rowDishRow As DishRow = CType(Me.NewRow,DishRow)
1608             Dim columnValuesArray() As Object = New Object() {ItemID, Dishname, Nothing, Nothing, Nothing, Rate, Discount}
1609             If (Not (parentCategoryRowByCategoryDish) Is Nothing) Then
1610                 columnValuesArray(2) = parentCategoryRowByCategoryDish(0)
1611             End If
1612             If (Not (parentKitchenRowByKitchenDish) Is Nothing) Then
1613                 columnValuesArray(3) = parentKitchenRowByKitchenDish(0)
1614             End If
1615             If (Not (parentInventoryTypeRowByInventoryTypeDish) Is Nothing) Then
1616                 columnValuesArray(4) = parentInventoryTypeRowByInventoryTypeDish(0)
1617             End If
1618             rowDishRow.ItemArray = columnValuesArray
1619             Me.Rows.Add(rowDishRow)
1620             Return rowDishRow
1621         End Function
1622         
1623         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1624          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1625         Public Function FindByItemID(ByVal ItemID As Integer) As DishRow
1626             Return CType(Me.Rows.Find(New Object() {ItemID}),DishRow)
1627         End Function
1628         
1629         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1630          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1631         Public Overrides Function Clone() As Global.System.Data.DataTable
1632             Dim cln As DishDataTable = CType(MyBase.Clone,DishDataTable)
1633             cln.InitVars
1634             Return cln
1635         End Function
1636         
1637         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1638          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1639         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
1640             Return New DishDataTable()
1641         End Function
1642         
1643         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1644          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1645         Friend Sub InitVars()
1646             Me.columnItemID = MyBase.Columns("ItemID")
1647             Me.columnDishname = MyBase.Columns("Dishname")
1648             Me.columnCategory = MyBase.Columns("Category")
1649             Me.columnKitchen = MyBase.Columns("Kitchen")
1650             Me.columnInventoryType = MyBase.Columns("InventoryType")
1651             Me.columnRate = MyBase.Columns("Rate")
1652             Me.columnDiscount = MyBase.Columns("Discount")
1653         End Sub
1654         
1655         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1656          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1657         Private Sub InitClass()
1658             Me.columnItemID = New Global.System.Data.DataColumn("ItemID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
1659             MyBase.Columns.Add(Me.columnItemID)
1660             Me.columnDishname = New Global.System.Data.DataColumn("Dishname", GetType(String), Nothing, Global.System.Data.MappingType.Element)
1661             MyBase.Columns.Add(Me.columnDishname)
1662             Me.columnCategory = New Global.System.Data.DataColumn("Category", GetType(String), Nothing, Global.System.Data.MappingType.Element)
1663             MyBase.Columns.Add(Me.columnCategory)
1664             Me.columnKitchen = New Global.System.Data.DataColumn("Kitchen", GetType(String), Nothing, Global.System.Data.MappingType.Element)
1665             MyBase.Columns.Add(Me.columnKitchen)
1666             Me.columnInventoryType = New Global.System.Data.DataColumn("InventoryType", GetType(String), Nothing, Global.System.Data.MappingType.Element)
1667             MyBase.Columns.Add(Me.columnInventoryType)
1668             Me.columnRate = New Global.System.Data.DataColumn("Rate", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
1669             MyBase.Columns.Add(Me.columnRate)
1670             Me.columnDiscount = New Global.System.Data.DataColumn("Discount", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
1671             MyBase.Columns.Add(Me.columnDiscount)
1672             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnItemID}, true))
1673             Me.columnItemID.AllowDBNull = false
1674             Me.columnItemID.Unique = true
1675             Me.columnDishname.MaxLength = 255
1676             Me.columnCategory.MaxLength = 255
1677             Me.columnKitchen.MaxLength = 255
1678             Me.columnInventoryType.MaxLength = 255
1679         End Sub
1680         
1681         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1682          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1683         Public Function NewDishRow() As DishRow
1684             Return CType(Me.NewRow,DishRow)
1685         End Function
1686         
1687         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1688          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1689         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
1690             Return New DishRow(builder)
1691         End Function
1692         
1693         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1694          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1695         Protected Overrides Function GetRowType() As Global.System.Type
1696             Return GetType(DishRow)
1697         End Function
1698         
1699         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1700          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1701         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1702             MyBase.OnRowChanged(e)
1703             If (Not (Me.DishRowChangedEvent) Is Nothing) Then
1704                 RaiseEvent DishRowChanged(Me, New DishRowChangeEvent(CType(e.Row,DishRow), e.Action))
1705             End If
1706         End Sub
1707         
1708         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1709          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1710         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1711             MyBase.OnRowChanging(e)
1712             If (Not (Me.DishRowChangingEvent) Is Nothing) Then
1713                 RaiseEvent DishRowChanging(Me, New DishRowChangeEvent(CType(e.Row,DishRow), e.Action))
1714             End If
1715         End Sub
1716         
1717         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1718          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1719         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1720             MyBase.OnRowDeleted(e)
1721             If (Not (Me.DishRowDeletedEvent) Is Nothing) Then
1722                 RaiseEvent DishRowDeleted(Me, New DishRowChangeEvent(CType(e.Row,DishRow), e.Action))
1723             End If
1724         End Sub
1725         
1726         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1727          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1728         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
1729             MyBase.OnRowDeleting(e)
1730             If (Not (Me.DishRowDeletingEvent) Is Nothing) Then
1731                 RaiseEvent DishRowDeleting(Me, New DishRowChangeEvent(CType(e.Row,DishRow), e.Action))
1732             End If
1733         End Sub
1734         
1735         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1736          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1737         Public Sub RemoveDishRow(ByVal row As DishRow)
1738             Me.Rows.Remove(row)
1739         End Sub
1740         
1741         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1742          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1743         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
1744             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
1745             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
1746             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
1747             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
1748             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
1749             any1.MinOccurs = New Decimal(0)
1750             any1.MaxOccurs = Decimal.MaxValue
1751             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
1752             sequence.Items.Add(any1)
1753             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
1754             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
1755             any2.MinOccurs = New Decimal(1)
1756             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
1757             sequence.Items.Add(any2)
1758             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
1759             attribute1.Name = "namespace"
1760             attribute1.FixedValue = ds.Namespace
1761             type.Attributes.Add(attribute1)
1762             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
1763             attribute2.Name = "tableTypeName"
1764             attribute2.FixedValue = "DishDataTable"
1765             type.Attributes.Add(attribute2)
1766             type.Particle = sequence
1767             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
1768             If xs.Contains(dsSchema.TargetNamespace) Then
1769                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
1770                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
1771                 Try
1772                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
1773                     dsSchema.Write(s1)
1774                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
1775                     Do While schemas.MoveNext
1776                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
1777                         s2.SetLength(0)
1778                         schema.Write(s2)
1779                         If (s1.Length = s2.Length) Then
1780                             s1.Position = 0
1781                             s2.Position = 0
1782                             
1783                             Do While ((s1.Position <> s1.Length) _
1784                                         AndAlso (s1.ReadByte = s2.ReadByte))
1785                                 
1786                                 
1787                             Loop
1788                             If (s1.Position = s1.Length) Then
1789                                 Return type
1790                             End If
1791                         End If
1792                         
1793                     Loop
1794                 Finally
1795                     If (Not (s1) Is Nothing) Then
1796                         s1.Close
1797                     End If
1798                     If (Not (s2) Is Nothing) Then
1799                         s2.Close
1800                     End If
1801                 End Try
1802             End If
1803             xs.Add(dsSchema)
1804             Return type
1805         End Function
1806     End Class
1807     
1808     '''<summary>
1809     '''Represents the strongly named DataTable class.
1810     '''</summary>
1811     <Global.System.Serializable(), _
1812      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
1813     Partial Public Class HotelDataTable
1814         Inherits Global.System.Data.TypedTableBase(Of HotelRow)
1815         
1816         Private columnID As Global.System.Data.DataColumn
1817         
1818         Private columnHotelName As Global.System.Data.DataColumn
1819         
1820         Private columnAddressLine1 As Global.System.Data.DataColumn
1821         
1822         Private columnAddressLine2 As Global.System.Data.DataColumn
1823         
1824         Private columnAddressLine3 As Global.System.Data.DataColumn
1825         
1826         Private columnContactNo As Global.System.Data.DataColumn
1827         
1828         Private columnEmailID As Global.System.Data.DataColumn
1829         
1830         Private columnTIN As Global.System.Data.DataColumn
1831         
1832         Private columnSTNo As Global.System.Data.DataColumn
1833         
1834         Private columnCIN As Global.System.Data.DataColumn
1835         
1836         Private columnLogo As Global.System.Data.DataColumn
1837         
1838         Private columnBaseCurrency As Global.System.Data.DataColumn
1839         
1840         Private columnCurrencyCode As Global.System.Data.DataColumn
1841         
1842         Private columnTicketFooterMessage As Global.System.Data.DataColumn
1843         
1844         Private columnStartBillNo As Global.System.Data.DataColumn
1845         
1846         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1847          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1848         Public Sub New()
1849             MyBase.New
1850             Me.TableName = "Hotel"
1851             Me.BeginInit
1852             Me.InitClass
1853             Me.EndInit
1854         End Sub
1855         
1856         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1857          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1858         Friend Sub New(ByVal table As Global.System.Data.DataTable)
1859             MyBase.New
1860             Me.TableName = table.TableName
1861             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
1862                 Me.CaseSensitive = table.CaseSensitive
1863             End If
1864             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
1865                 Me.Locale = table.Locale
1866             End If
1867             If (table.Namespace <> table.DataSet.Namespace) Then
1868                 Me.Namespace = table.Namespace
1869             End If
1870             Me.Prefix = table.Prefix
1871             Me.MinimumCapacity = table.MinimumCapacity
1872         End Sub
1873         
1874         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1875          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1876         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
1877             MyBase.New(info, context)
1878             Me.InitVars
1879         End Sub
1880         
1881         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1882          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1883         Public ReadOnly Property IDColumn() As Global.System.Data.DataColumn
1884             Get
1885                 Return Me.columnID
1886             End Get
1887         End Property
1888         
1889         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1890          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1891         Public ReadOnly Property HotelNameColumn() As Global.System.Data.DataColumn
1892             Get
1893                 Return Me.columnHotelName
1894             End Get
1895         End Property
1896         
1897         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1898          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1899         Public ReadOnly Property AddressLine1Column() As Global.System.Data.DataColumn
1900             Get
1901                 Return Me.columnAddressLine1
1902             End Get
1903         End Property
1904         
1905         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1906          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1907         Public ReadOnly Property AddressLine2Column() As Global.System.Data.DataColumn
1908             Get
1909                 Return Me.columnAddressLine2
1910             End Get
1911         End Property
1912         
1913         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1914          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1915         Public ReadOnly Property AddressLine3Column() As Global.System.Data.DataColumn
1916             Get
1917                 Return Me.columnAddressLine3
1918             End Get
1919         End Property
1920         
1921         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1922          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1923         Public ReadOnly Property ContactNoColumn() As Global.System.Data.DataColumn
1924             Get
1925                 Return Me.columnContactNo
1926             End Get
1927         End Property
1928         
1929         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1930          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1931         Public ReadOnly Property EmailIDColumn() As Global.System.Data.DataColumn
1932             Get
1933                 Return Me.columnEmailID
1934             End Get
1935         End Property
1936         
1937         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1938          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1939         Public ReadOnly Property TINColumn() As Global.System.Data.DataColumn
1940             Get
1941                 Return Me.columnTIN
1942             End Get
1943         End Property
1944         
1945         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1946          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1947         Public ReadOnly Property STNoColumn() As Global.System.Data.DataColumn
1948             Get
1949                 Return Me.columnSTNo
1950             End Get
1951         End Property
1952         
1953         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1954          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1955         Public ReadOnly Property CINColumn() As Global.System.Data.DataColumn
1956             Get
1957                 Return Me.columnCIN
1958             End Get
1959         End Property
1960         
1961         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1962          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1963         Public ReadOnly Property LogoColumn() As Global.System.Data.DataColumn
1964             Get
1965                 Return Me.columnLogo
1966             End Get
1967         End Property
1968         
1969         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1970          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1971         Public ReadOnly Property BaseCurrencyColumn() As Global.System.Data.DataColumn
1972             Get
1973                 Return Me.columnBaseCurrency
1974             End Get
1975         End Property
1976         
1977         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1978          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1979         Public ReadOnly Property CurrencyCodeColumn() As Global.System.Data.DataColumn
1980             Get
1981                 Return Me.columnCurrencyCode
1982             End Get
1983         End Property
1984         
1985         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1986          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1987         Public ReadOnly Property TicketFooterMessageColumn() As Global.System.Data.DataColumn
1988             Get
1989                 Return Me.columnTicketFooterMessage
1990             End Get
1991         End Property
1992         
1993         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
1994          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
1995         Public ReadOnly Property StartBillNoColumn() As Global.System.Data.DataColumn
1996             Get
1997                 Return Me.columnStartBillNo
1998             End Get
1999         End Property
2000         
2001         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2002          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
2003          Global.System.ComponentModel.Browsable(false)> _
2004         Public ReadOnly Property Count() As Integer
2005             Get
2006                 Return Me.Rows.Count
2007             End Get
2008         End Property
2009         
2010         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2011          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2012         Public Default ReadOnly Property Item(ByVal index As Integer) As HotelRow
2013             Get
2014                 Return CType(Me.Rows(index),HotelRow)
2015             End Get
2016         End Property
2017         
2018         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2019         Public Event HotelRowChanging As HotelRowChangeEventHandler
2020         
2021         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2022         Public Event HotelRowChanged As HotelRowChangeEventHandler
2023         
2024         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2025         Public Event HotelRowDeleting As HotelRowChangeEventHandler
2026         
2027         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2028         Public Event HotelRowDeleted As HotelRowChangeEventHandler
2029         
2030         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2031          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2032         Public Overloads Sub AddHotelRow(ByVal row As HotelRow)
2033             Me.Rows.Add(row)
2034         End Sub
2035         
2036         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2037          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2038         Public Overloads Function AddHotelRow(ByVal HotelName As String, ByVal AddressLine1 As String, ByVal AddressLine2 As String, ByVal AddressLine3 As String, ByVal ContactNo As String, ByVal EmailID As String, ByVal TIN As String, ByVal STNo As String, ByVal CIN As String, ByVal Logo() As Byte, ByVal BaseCurrency As String, ByVal CurrencyCode As String, ByVal TicketFooterMessage As String, ByVal StartBillNo As Short) As HotelRow
2039             Dim rowHotelRow As HotelRow = CType(Me.NewRow,HotelRow)
2040             Dim columnValuesArray() As Object = New Object() {Nothing, HotelName, AddressLine1, AddressLine2, AddressLine3, ContactNo, EmailID, TIN, STNo, CIN, Logo, BaseCurrency, CurrencyCode, TicketFooterMessage, StartBillNo}
2041             rowHotelRow.ItemArray = columnValuesArray
2042             Me.Rows.Add(rowHotelRow)
2043             Return rowHotelRow
2044         End Function
2045         
2046         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2047          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2048         Public Function FindByID(ByVal ID As Integer) As HotelRow
2049             Return CType(Me.Rows.Find(New Object() {ID}),HotelRow)
2050         End Function
2051         
2052         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2053          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2054         Public Overrides Function Clone() As Global.System.Data.DataTable
2055             Dim cln As HotelDataTable = CType(MyBase.Clone,HotelDataTable)
2056             cln.InitVars
2057             Return cln
2058         End Function
2059         
2060         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2061          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2062         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
2063             Return New HotelDataTable()
2064         End Function
2065         
2066         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2067          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2068         Friend Sub InitVars()
2069             Me.columnID = MyBase.Columns("ID")
2070             Me.columnHotelName = MyBase.Columns("HotelName")
2071             Me.columnAddressLine1 = MyBase.Columns("AddressLine1")
2072             Me.columnAddressLine2 = MyBase.Columns("AddressLine2")
2073             Me.columnAddressLine3 = MyBase.Columns("AddressLine3")
2074             Me.columnContactNo = MyBase.Columns("ContactNo")
2075             Me.columnEmailID = MyBase.Columns("EmailID")
2076             Me.columnTIN = MyBase.Columns("TIN")
2077             Me.columnSTNo = MyBase.Columns("STNo")
2078             Me.columnCIN = MyBase.Columns("CIN")
2079             Me.columnLogo = MyBase.Columns("Logo")
2080             Me.columnBaseCurrency = MyBase.Columns("BaseCurrency")
2081             Me.columnCurrencyCode = MyBase.Columns("CurrencyCode")
2082             Me.columnTicketFooterMessage = MyBase.Columns("TicketFooterMessage")
2083             Me.columnStartBillNo = MyBase.Columns("StartBillNo")
2084         End Sub
2085         
2086         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2087          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2088         Private Sub InitClass()
2089             Me.columnID = New Global.System.Data.DataColumn("ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
2090             MyBase.Columns.Add(Me.columnID)
2091             Me.columnHotelName = New Global.System.Data.DataColumn("HotelName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2092             MyBase.Columns.Add(Me.columnHotelName)
2093             Me.columnAddressLine1 = New Global.System.Data.DataColumn("AddressLine1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2094             MyBase.Columns.Add(Me.columnAddressLine1)
2095             Me.columnAddressLine2 = New Global.System.Data.DataColumn("AddressLine2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2096             MyBase.Columns.Add(Me.columnAddressLine2)
2097             Me.columnAddressLine3 = New Global.System.Data.DataColumn("AddressLine3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2098             MyBase.Columns.Add(Me.columnAddressLine3)
2099             Me.columnContactNo = New Global.System.Data.DataColumn("ContactNo", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2100             MyBase.Columns.Add(Me.columnContactNo)
2101             Me.columnEmailID = New Global.System.Data.DataColumn("EmailID", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2102             MyBase.Columns.Add(Me.columnEmailID)
2103             Me.columnTIN = New Global.System.Data.DataColumn("TIN", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2104             MyBase.Columns.Add(Me.columnTIN)
2105             Me.columnSTNo = New Global.System.Data.DataColumn("STNo", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2106             MyBase.Columns.Add(Me.columnSTNo)
2107             Me.columnCIN = New Global.System.Data.DataColumn("CIN", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2108             MyBase.Columns.Add(Me.columnCIN)
2109             Me.columnLogo = New Global.System.Data.DataColumn("Logo", GetType(Byte()), Nothing, Global.System.Data.MappingType.Element)
2110             MyBase.Columns.Add(Me.columnLogo)
2111             Me.columnBaseCurrency = New Global.System.Data.DataColumn("BaseCurrency", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2112             MyBase.Columns.Add(Me.columnBaseCurrency)
2113             Me.columnCurrencyCode = New Global.System.Data.DataColumn("CurrencyCode", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2114             MyBase.Columns.Add(Me.columnCurrencyCode)
2115             Me.columnTicketFooterMessage = New Global.System.Data.DataColumn("TicketFooterMessage", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2116             MyBase.Columns.Add(Me.columnTicketFooterMessage)
2117             Me.columnStartBillNo = New Global.System.Data.DataColumn("StartBillNo", GetType(Short), Nothing, Global.System.Data.MappingType.Element)
2118             MyBase.Columns.Add(Me.columnStartBillNo)
2119             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnID}, true))
2120             Me.columnID.AutoIncrement = true
2121             Me.columnID.AutoIncrementSeed = -1
2122             Me.columnID.AutoIncrementStep = -1
2123             Me.columnID.AllowDBNull = false
2124             Me.columnID.Unique = true
2125             Me.columnHotelName.MaxLength = 255
2126             Me.columnAddressLine1.MaxLength = 255
2127             Me.columnAddressLine2.MaxLength = 255
2128             Me.columnAddressLine3.MaxLength = 255
2129             Me.columnContactNo.MaxLength = 255
2130             Me.columnEmailID.MaxLength = 255
2131             Me.columnTIN.MaxLength = 255
2132             Me.columnSTNo.MaxLength = 255
2133             Me.columnCIN.MaxLength = 255
2134             Me.columnBaseCurrency.MaxLength = 255
2135             Me.columnCurrencyCode.MaxLength = 255
2136             Me.columnTicketFooterMessage.MaxLength = 255
2137         End Sub
2138         
2139         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2140          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2141         Public Function NewHotelRow() As HotelRow
2142             Return CType(Me.NewRow,HotelRow)
2143         End Function
2144         
2145         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2146          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2147         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
2148             Return New HotelRow(builder)
2149         End Function
2150         
2151         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2152          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2153         Protected Overrides Function GetRowType() As Global.System.Type
2154             Return GetType(HotelRow)
2155         End Function
2156         
2157         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2158          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2159         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2160             MyBase.OnRowChanged(e)
2161             If (Not (Me.HotelRowChangedEvent) Is Nothing) Then
2162                 RaiseEvent HotelRowChanged(Me, New HotelRowChangeEvent(CType(e.Row,HotelRow), e.Action))
2163             End If
2164         End Sub
2165         
2166         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2167          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2168         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2169             MyBase.OnRowChanging(e)
2170             If (Not (Me.HotelRowChangingEvent) Is Nothing) Then
2171                 RaiseEvent HotelRowChanging(Me, New HotelRowChangeEvent(CType(e.Row,HotelRow), e.Action))
2172             End If
2173         End Sub
2174         
2175         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2176          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2177         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2178             MyBase.OnRowDeleted(e)
2179             If (Not (Me.HotelRowDeletedEvent) Is Nothing) Then
2180                 RaiseEvent HotelRowDeleted(Me, New HotelRowChangeEvent(CType(e.Row,HotelRow), e.Action))
2181             End If
2182         End Sub
2183         
2184         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2185          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2186         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2187             MyBase.OnRowDeleting(e)
2188             If (Not (Me.HotelRowDeletingEvent) Is Nothing) Then
2189                 RaiseEvent HotelRowDeleting(Me, New HotelRowChangeEvent(CType(e.Row,HotelRow), e.Action))
2190             End If
2191         End Sub
2192         
2193         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2194          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2195         Public Sub RemoveHotelRow(ByVal row As HotelRow)
2196             Me.Rows.Remove(row)
2197         End Sub
2198         
2199         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2200          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2201         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
2202             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
2203             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
2204             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
2205             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
2206             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
2207             any1.MinOccurs = New Decimal(0)
2208             any1.MaxOccurs = Decimal.MaxValue
2209             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
2210             sequence.Items.Add(any1)
2211             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
2212             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
2213             any2.MinOccurs = New Decimal(1)
2214             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
2215             sequence.Items.Add(any2)
2216             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
2217             attribute1.Name = "namespace"
2218             attribute1.FixedValue = ds.Namespace
2219             type.Attributes.Add(attribute1)
2220             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
2221             attribute2.Name = "tableTypeName"
2222             attribute2.FixedValue = "HotelDataTable"
2223             type.Attributes.Add(attribute2)
2224             type.Particle = sequence
2225             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
2226             If xs.Contains(dsSchema.TargetNamespace) Then
2227                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
2228                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
2229                 Try
2230                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
2231                     dsSchema.Write(s1)
2232                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
2233                     Do While schemas.MoveNext
2234                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
2235                         s2.SetLength(0)
2236                         schema.Write(s2)
2237                         If (s1.Length = s2.Length) Then
2238                             s1.Position = 0
2239                             s2.Position = 0
2240                             
2241                             Do While ((s1.Position <> s1.Length) _
2242                                         AndAlso (s1.ReadByte = s2.ReadByte))
2243                                 
2244                                 
2245                             Loop
2246                             If (s1.Position = s1.Length) Then
2247                                 Return type
2248                             End If
2249                         End If
2250                         
2251                     Loop
2252                 Finally
2253                     If (Not (s1) Is Nothing) Then
2254                         s1.Close
2255                     End If
2256                     If (Not (s2) Is Nothing) Then
2257                         s2.Close
2258                     End If
2259                 End Try
2260             End If
2261             xs.Add(dsSchema)
2262             Return type
2263         End Function
2264     End Class
2265     
2266     '''<summary>
2267     '''Represents the strongly named DataTable class.
2268     '''</summary>
2269     <Global.System.Serializable(), _
2270      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
2271     Partial Public Class InventoryTypeDataTable
2272         Inherits Global.System.Data.TypedTableBase(Of InventoryTypeRow)
2273         
2274         Private columnType As Global.System.Data.DataColumn
2275         
2276         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2277          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2278         Public Sub New()
2279             MyBase.New
2280             Me.TableName = "InventoryType"
2281             Me.BeginInit
2282             Me.InitClass
2283             Me.EndInit
2284         End Sub
2285         
2286         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2287          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2288         Friend Sub New(ByVal table As Global.System.Data.DataTable)
2289             MyBase.New
2290             Me.TableName = table.TableName
2291             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
2292                 Me.CaseSensitive = table.CaseSensitive
2293             End If
2294             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
2295                 Me.Locale = table.Locale
2296             End If
2297             If (table.Namespace <> table.DataSet.Namespace) Then
2298                 Me.Namespace = table.Namespace
2299             End If
2300             Me.Prefix = table.Prefix
2301             Me.MinimumCapacity = table.MinimumCapacity
2302         End Sub
2303         
2304         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2305          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2306         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
2307             MyBase.New(info, context)
2308             Me.InitVars
2309         End Sub
2310         
2311         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2312          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2313         Public ReadOnly Property TypeColumn() As Global.System.Data.DataColumn
2314             Get
2315                 Return Me.columnType
2316             End Get
2317         End Property
2318         
2319         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2320          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
2321          Global.System.ComponentModel.Browsable(false)> _
2322         Public ReadOnly Property Count() As Integer
2323             Get
2324                 Return Me.Rows.Count
2325             End Get
2326         End Property
2327         
2328         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2329          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2330         Public Default ReadOnly Property Item(ByVal index As Integer) As InventoryTypeRow
2331             Get
2332                 Return CType(Me.Rows(index),InventoryTypeRow)
2333             End Get
2334         End Property
2335         
2336         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2337         Public Event InventoryTypeRowChanging As InventoryTypeRowChangeEventHandler
2338         
2339         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2340         Public Event InventoryTypeRowChanged As InventoryTypeRowChangeEventHandler
2341         
2342         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2343         Public Event InventoryTypeRowDeleting As InventoryTypeRowChangeEventHandler
2344         
2345         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2346         Public Event InventoryTypeRowDeleted As InventoryTypeRowChangeEventHandler
2347         
2348         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2349          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2350         Public Overloads Sub AddInventoryTypeRow(ByVal row As InventoryTypeRow)
2351             Me.Rows.Add(row)
2352         End Sub
2353         
2354         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2355          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2356         Public Overloads Function AddInventoryTypeRow(ByVal Type As String) As InventoryTypeRow
2357             Dim rowInventoryTypeRow As InventoryTypeRow = CType(Me.NewRow,InventoryTypeRow)
2358             Dim columnValuesArray() As Object = New Object() {Type}
2359             rowInventoryTypeRow.ItemArray = columnValuesArray
2360             Me.Rows.Add(rowInventoryTypeRow)
2361             Return rowInventoryTypeRow
2362         End Function
2363         
2364         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2365          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2366         Public Function FindByType(ByVal Type As String) As InventoryTypeRow
2367             Return CType(Me.Rows.Find(New Object() {Type}),InventoryTypeRow)
2368         End Function
2369         
2370         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2371          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2372         Public Overrides Function Clone() As Global.System.Data.DataTable
2373             Dim cln As InventoryTypeDataTable = CType(MyBase.Clone,InventoryTypeDataTable)
2374             cln.InitVars
2375             Return cln
2376         End Function
2377         
2378         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2379          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2380         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
2381             Return New InventoryTypeDataTable()
2382         End Function
2383         
2384         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2385          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2386         Friend Sub InitVars()
2387             Me.columnType = MyBase.Columns("Type")
2388         End Sub
2389         
2390         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2391          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2392         Private Sub InitClass()
2393             Me.columnType = New Global.System.Data.DataColumn("Type", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2394             MyBase.Columns.Add(Me.columnType)
2395             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnType}, true))
2396             Me.columnType.AllowDBNull = false
2397             Me.columnType.Unique = true
2398             Me.columnType.MaxLength = 255
2399         End Sub
2400         
2401         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2402          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2403         Public Function NewInventoryTypeRow() As InventoryTypeRow
2404             Return CType(Me.NewRow,InventoryTypeRow)
2405         End Function
2406         
2407         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2408          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2409         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
2410             Return New InventoryTypeRow(builder)
2411         End Function
2412         
2413         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2414          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2415         Protected Overrides Function GetRowType() As Global.System.Type
2416             Return GetType(InventoryTypeRow)
2417         End Function
2418         
2419         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2420          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2421         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2422             MyBase.OnRowChanged(e)
2423             If (Not (Me.InventoryTypeRowChangedEvent) Is Nothing) Then
2424                 RaiseEvent InventoryTypeRowChanged(Me, New InventoryTypeRowChangeEvent(CType(e.Row,InventoryTypeRow), e.Action))
2425             End If
2426         End Sub
2427         
2428         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2429          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2430         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2431             MyBase.OnRowChanging(e)
2432             If (Not (Me.InventoryTypeRowChangingEvent) Is Nothing) Then
2433                 RaiseEvent InventoryTypeRowChanging(Me, New InventoryTypeRowChangeEvent(CType(e.Row,InventoryTypeRow), e.Action))
2434             End If
2435         End Sub
2436         
2437         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2438          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2439         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2440             MyBase.OnRowDeleted(e)
2441             If (Not (Me.InventoryTypeRowDeletedEvent) Is Nothing) Then
2442                 RaiseEvent InventoryTypeRowDeleted(Me, New InventoryTypeRowChangeEvent(CType(e.Row,InventoryTypeRow), e.Action))
2443             End If
2444         End Sub
2445         
2446         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2447          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2448         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2449             MyBase.OnRowDeleting(e)
2450             If (Not (Me.InventoryTypeRowDeletingEvent) Is Nothing) Then
2451                 RaiseEvent InventoryTypeRowDeleting(Me, New InventoryTypeRowChangeEvent(CType(e.Row,InventoryTypeRow), e.Action))
2452             End If
2453         End Sub
2454         
2455         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2456          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2457         Public Sub RemoveInventoryTypeRow(ByVal row As InventoryTypeRow)
2458             Me.Rows.Remove(row)
2459         End Sub
2460         
2461         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2462          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2463         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
2464             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
2465             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
2466             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
2467             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
2468             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
2469             any1.MinOccurs = New Decimal(0)
2470             any1.MaxOccurs = Decimal.MaxValue
2471             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
2472             sequence.Items.Add(any1)
2473             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
2474             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
2475             any2.MinOccurs = New Decimal(1)
2476             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
2477             sequence.Items.Add(any2)
2478             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
2479             attribute1.Name = "namespace"
2480             attribute1.FixedValue = ds.Namespace
2481             type.Attributes.Add(attribute1)
2482             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
2483             attribute2.Name = "tableTypeName"
2484             attribute2.FixedValue = "InventoryTypeDataTable"
2485             type.Attributes.Add(attribute2)
2486             type.Particle = sequence
2487             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
2488             If xs.Contains(dsSchema.TargetNamespace) Then
2489                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
2490                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
2491                 Try
2492                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
2493                     dsSchema.Write(s1)
2494                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
2495                     Do While schemas.MoveNext
2496                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
2497                         s2.SetLength(0)
2498                         schema.Write(s2)
2499                         If (s1.Length = s2.Length) Then
2500                             s1.Position = 0
2501                             s2.Position = 0
2502                             
2503                             Do While ((s1.Position <> s1.Length) _
2504                                         AndAlso (s1.ReadByte = s2.ReadByte))
2505                                 
2506                                 
2507                             Loop
2508                             If (s1.Position = s1.Length) Then
2509                                 Return type
2510                             End If
2511                         End If
2512                         
2513                     Loop
2514                 Finally
2515                     If (Not (s1) Is Nothing) Then
2516                         s1.Close
2517                     End If
2518                     If (Not (s2) Is Nothing) Then
2519                         s2.Close
2520                     End If
2521                 End Try
2522             End If
2523             xs.Add(dsSchema)
2524             Return type
2525         End Function
2526     End Class
2527     
2528     '''<summary>
2529     '''Represents the strongly named DataTable class.
2530     '''</summary>
2531     <Global.System.Serializable(), _
2532      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
2533     Partial Public Class KitchenDataTable
2534         Inherits Global.System.Data.TypedTableBase(Of KitchenRow)
2535         
2536         Private columnKitchenName As Global.System.Data.DataColumn
2537         
2538         Private columnPrinter As Global.System.Data.DataColumn
2539         
2540         Private columnIsEnabled As Global.System.Data.DataColumn
2541         
2542         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2543          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2544         Public Sub New()
2545             MyBase.New
2546             Me.TableName = "Kitchen"
2547             Me.BeginInit
2548             Me.InitClass
2549             Me.EndInit
2550         End Sub
2551         
2552         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2553          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2554         Friend Sub New(ByVal table As Global.System.Data.DataTable)
2555             MyBase.New
2556             Me.TableName = table.TableName
2557             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
2558                 Me.CaseSensitive = table.CaseSensitive
2559             End If
2560             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
2561                 Me.Locale = table.Locale
2562             End If
2563             If (table.Namespace <> table.DataSet.Namespace) Then
2564                 Me.Namespace = table.Namespace
2565             End If
2566             Me.Prefix = table.Prefix
2567             Me.MinimumCapacity = table.MinimumCapacity
2568         End Sub
2569         
2570         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2571          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2572         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
2573             MyBase.New(info, context)
2574             Me.InitVars
2575         End Sub
2576         
2577         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2578          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2579         Public ReadOnly Property KitchenNameColumn() As Global.System.Data.DataColumn
2580             Get
2581                 Return Me.columnKitchenName
2582             End Get
2583         End Property
2584         
2585         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2586          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2587         Public ReadOnly Property PrinterColumn() As Global.System.Data.DataColumn
2588             Get
2589                 Return Me.columnPrinter
2590             End Get
2591         End Property
2592         
2593         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2594          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2595         Public ReadOnly Property IsEnabledColumn() As Global.System.Data.DataColumn
2596             Get
2597                 Return Me.columnIsEnabled
2598             End Get
2599         End Property
2600         
2601         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2602          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
2603          Global.System.ComponentModel.Browsable(false)> _
2604         Public ReadOnly Property Count() As Integer
2605             Get
2606                 Return Me.Rows.Count
2607             End Get
2608         End Property
2609         
2610         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2611          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2612         Public Default ReadOnly Property Item(ByVal index As Integer) As KitchenRow
2613             Get
2614                 Return CType(Me.Rows(index),KitchenRow)
2615             End Get
2616         End Property
2617         
2618         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2619         Public Event KitchenRowChanging As KitchenRowChangeEventHandler
2620         
2621         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2622         Public Event KitchenRowChanged As KitchenRowChangeEventHandler
2623         
2624         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2625         Public Event KitchenRowDeleting As KitchenRowChangeEventHandler
2626         
2627         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2628         Public Event KitchenRowDeleted As KitchenRowChangeEventHandler
2629         
2630         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2631          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2632         Public Overloads Sub AddKitchenRow(ByVal row As KitchenRow)
2633             Me.Rows.Add(row)
2634         End Sub
2635         
2636         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2637          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2638         Public Overloads Function AddKitchenRow(ByVal KitchenName As String, ByVal Printer As String, ByVal IsEnabled As String) As KitchenRow
2639             Dim rowKitchenRow As KitchenRow = CType(Me.NewRow,KitchenRow)
2640             Dim columnValuesArray() As Object = New Object() {KitchenName, Printer, IsEnabled}
2641             rowKitchenRow.ItemArray = columnValuesArray
2642             Me.Rows.Add(rowKitchenRow)
2643             Return rowKitchenRow
2644         End Function
2645         
2646         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2647          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2648         Public Function FindByKitchenName(ByVal KitchenName As String) As KitchenRow
2649             Return CType(Me.Rows.Find(New Object() {KitchenName}),KitchenRow)
2650         End Function
2651         
2652         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2653          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2654         Public Overrides Function Clone() As Global.System.Data.DataTable
2655             Dim cln As KitchenDataTable = CType(MyBase.Clone,KitchenDataTable)
2656             cln.InitVars
2657             Return cln
2658         End Function
2659         
2660         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2661          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2662         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
2663             Return New KitchenDataTable()
2664         End Function
2665         
2666         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2667          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2668         Friend Sub InitVars()
2669             Me.columnKitchenName = MyBase.Columns("KitchenName")
2670             Me.columnPrinter = MyBase.Columns("Printer")
2671             Me.columnIsEnabled = MyBase.Columns("IsEnabled")
2672         End Sub
2673         
2674         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2675          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2676         Private Sub InitClass()
2677             Me.columnKitchenName = New Global.System.Data.DataColumn("KitchenName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2678             MyBase.Columns.Add(Me.columnKitchenName)
2679             Me.columnPrinter = New Global.System.Data.DataColumn("Printer", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2680             MyBase.Columns.Add(Me.columnPrinter)
2681             Me.columnIsEnabled = New Global.System.Data.DataColumn("IsEnabled", GetType(String), Nothing, Global.System.Data.MappingType.Element)
2682             MyBase.Columns.Add(Me.columnIsEnabled)
2683             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnKitchenName}, true))
2684             Me.columnKitchenName.AllowDBNull = false
2685             Me.columnKitchenName.Unique = true
2686             Me.columnKitchenName.MaxLength = 255
2687             Me.columnPrinter.MaxLength = 255
2688             Me.columnIsEnabled.MaxLength = 255
2689         End Sub
2690         
2691         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2692          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2693         Public Function NewKitchenRow() As KitchenRow
2694             Return CType(Me.NewRow,KitchenRow)
2695         End Function
2696         
2697         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2698          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2699         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
2700             Return New KitchenRow(builder)
2701         End Function
2702         
2703         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2704          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2705         Protected Overrides Function GetRowType() As Global.System.Type
2706             Return GetType(KitchenRow)
2707         End Function
2708         
2709         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2710          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2711         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2712             MyBase.OnRowChanged(e)
2713             If (Not (Me.KitchenRowChangedEvent) Is Nothing) Then
2714                 RaiseEvent KitchenRowChanged(Me, New KitchenRowChangeEvent(CType(e.Row,KitchenRow), e.Action))
2715             End If
2716         End Sub
2717         
2718         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2719          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2720         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2721             MyBase.OnRowChanging(e)
2722             If (Not (Me.KitchenRowChangingEvent) Is Nothing) Then
2723                 RaiseEvent KitchenRowChanging(Me, New KitchenRowChangeEvent(CType(e.Row,KitchenRow), e.Action))
2724             End If
2725         End Sub
2726         
2727         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2728          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2729         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2730             MyBase.OnRowDeleted(e)
2731             If (Not (Me.KitchenRowDeletedEvent) Is Nothing) Then
2732                 RaiseEvent KitchenRowDeleted(Me, New KitchenRowChangeEvent(CType(e.Row,KitchenRow), e.Action))
2733             End If
2734         End Sub
2735         
2736         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2737          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2738         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
2739             MyBase.OnRowDeleting(e)
2740             If (Not (Me.KitchenRowDeletingEvent) Is Nothing) Then
2741                 RaiseEvent KitchenRowDeleting(Me, New KitchenRowChangeEvent(CType(e.Row,KitchenRow), e.Action))
2742             End If
2743         End Sub
2744         
2745         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2746          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2747         Public Sub RemoveKitchenRow(ByVal row As KitchenRow)
2748             Me.Rows.Remove(row)
2749         End Sub
2750         
2751         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2752          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2753         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
2754             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
2755             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
2756             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
2757             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
2758             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
2759             any1.MinOccurs = New Decimal(0)
2760             any1.MaxOccurs = Decimal.MaxValue
2761             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
2762             sequence.Items.Add(any1)
2763             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
2764             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
2765             any2.MinOccurs = New Decimal(1)
2766             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
2767             sequence.Items.Add(any2)
2768             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
2769             attribute1.Name = "namespace"
2770             attribute1.FixedValue = ds.Namespace
2771             type.Attributes.Add(attribute1)
2772             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
2773             attribute2.Name = "tableTypeName"
2774             attribute2.FixedValue = "KitchenDataTable"
2775             type.Attributes.Add(attribute2)
2776             type.Particle = sequence
2777             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
2778             If xs.Contains(dsSchema.TargetNamespace) Then
2779                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
2780                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
2781                 Try
2782                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
2783                     dsSchema.Write(s1)
2784                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
2785                     Do While schemas.MoveNext
2786                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
2787                         s2.SetLength(0)
2788                         schema.Write(s2)
2789                         If (s1.Length = s2.Length) Then
2790                             s1.Position = 0
2791                             s2.Position = 0
2792                             
2793                             Do While ((s1.Position <> s1.Length) _
2794                                         AndAlso (s1.ReadByte = s2.ReadByte))
2795                                 
2796                                 
2797                             Loop
2798                             If (s1.Position = s1.Length) Then
2799                                 Return type
2800                             End If
2801                         End If
2802                         
2803                     Loop
2804                 Finally
2805                     If (Not (s1) Is Nothing) Then
2806                         s1.Close
2807                     End If
2808                     If (Not (s2) Is Nothing) Then
2809                         s2.Close
2810                     End If
2811                 End Try
2812             End If
2813             xs.Add(dsSchema)
2814             Return type
2815         End Function
2816     End Class
2817     
2818     '''<summary>
2819     '''Represents the strongly named DataTable class.
2820     '''</summary>
2821     <Global.System.Serializable(), _
2822      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
2823     Partial Public Class KOTGenerationDataTable
2824         Inherits Global.System.Data.TypedTableBase(Of KOTGenerationRow)
2825         
2826         Private columnTicketID As Global.System.Data.DataColumn
2827         
2828         Private columnBillDate As Global.System.Data.DataColumn
2829         
2830         Private columnTableNo As Global.System.Data.DataColumn
2831         
2832         Private columnGroupName As Global.System.Data.DataColumn
2833         
2834         Private columnGrandTotal As Global.System.Data.DataColumn
2835         
2836         Private columnOperatorID As Global.System.Data.DataColumn
2837         
2838         Private columnBillNote As Global.System.Data.DataColumn
2839         
2840         Private columnStatus As Global.System.Data.DataColumn
2841         
2842         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2843          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2844         Public Sub New()
2845             MyBase.New
2846             Me.TableName = "KOTGeneration"
2847             Me.BeginInit
2848             Me.InitClass
2849             Me.EndInit
2850         End Sub
2851         
2852         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2853          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2854         Friend Sub New(ByVal table As Global.System.Data.DataTable)
2855             MyBase.New
2856             Me.TableName = table.TableName
2857             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
2858                 Me.CaseSensitive = table.CaseSensitive
2859             End If
2860             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
2861                 Me.Locale = table.Locale
2862             End If
2863             If (table.Namespace <> table.DataSet.Namespace) Then
2864                 Me.Namespace = table.Namespace
2865             End If
2866             Me.Prefix = table.Prefix
2867             Me.MinimumCapacity = table.MinimumCapacity
2868         End Sub
2869         
2870         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2871          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2872         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
2873             MyBase.New(info, context)
2874             Me.InitVars
2875         End Sub
2876         
2877         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2878          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2879         Public ReadOnly Property TicketIDColumn() As Global.System.Data.DataColumn
2880             Get
2881                 Return Me.columnTicketID
2882             End Get
2883         End Property
2884         
2885         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2886          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2887         Public ReadOnly Property BillDateColumn() As Global.System.Data.DataColumn
2888             Get
2889                 Return Me.columnBillDate
2890             End Get
2891         End Property
2892         
2893         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2894          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2895         Public ReadOnly Property TableNoColumn() As Global.System.Data.DataColumn
2896             Get
2897                 Return Me.columnTableNo
2898             End Get
2899         End Property
2900         
2901         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2902          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2903         Public ReadOnly Property GroupNameColumn() As Global.System.Data.DataColumn
2904             Get
2905                 Return Me.columnGroupName
2906             End Get
2907         End Property
2908         
2909         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2910          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2911         Public ReadOnly Property GrandTotalColumn() As Global.System.Data.DataColumn
2912             Get
2913                 Return Me.columnGrandTotal
2914             End Get
2915         End Property
2916         
2917         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2918          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2919         Public ReadOnly Property OperatorIDColumn() As Global.System.Data.DataColumn
2920             Get
2921                 Return Me.columnOperatorID
2922             End Get
2923         End Property
2924         
2925         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2926          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2927         Public ReadOnly Property BillNoteColumn() As Global.System.Data.DataColumn
2928             Get
2929                 Return Me.columnBillNote
2930             End Get
2931         End Property
2932         
2933         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2934          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2935         Public ReadOnly Property StatusColumn() As Global.System.Data.DataColumn
2936             Get
2937                 Return Me.columnStatus
2938             End Get
2939         End Property
2940         
2941         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2942          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
2943          Global.System.ComponentModel.Browsable(false)> _
2944         Public ReadOnly Property Count() As Integer
2945             Get
2946                 Return Me.Rows.Count
2947             End Get
2948         End Property
2949         
2950         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2951          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2952         Public Default ReadOnly Property Item(ByVal index As Integer) As KOTGenerationRow
2953             Get
2954                 Return CType(Me.Rows(index),KOTGenerationRow)
2955             End Get
2956         End Property
2957         
2958         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2959         Public Event KOTGenerationRowChanging As KOTGenerationRowChangeEventHandler
2960         
2961         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2962         Public Event KOTGenerationRowChanged As KOTGenerationRowChangeEventHandler
2963         
2964         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2965         Public Event KOTGenerationRowDeleting As KOTGenerationRowChangeEventHandler
2966         
2967         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2968         Public Event KOTGenerationRowDeleted As KOTGenerationRowChangeEventHandler
2969         
2970         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2971          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2972         Public Overloads Sub AddKOTGenerationRow(ByVal row As KOTGenerationRow)
2973             Me.Rows.Add(row)
2974         End Sub
2975         
2976         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2977          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2978         Public Overloads Function AddKOTGenerationRow(ByVal TicketID As Integer, ByVal BillDate As Date, ByVal parentR_TableRowByR_TableKOTGeneration As R_TableRow, ByVal GroupName As String, ByVal GrandTotal As Decimal, ByVal parentRegistrationRowByRegistrationKOTGeneration As RegistrationRow, ByVal BillNote As String, ByVal Status As String) As KOTGenerationRow
2979             Dim rowKOTGenerationRow As KOTGenerationRow = CType(Me.NewRow,KOTGenerationRow)
2980             Dim columnValuesArray() As Object = New Object() {TicketID, BillDate, Nothing, GroupName, GrandTotal, Nothing, BillNote, Status}
2981             If (Not (parentR_TableRowByR_TableKOTGeneration) Is Nothing) Then
2982                 columnValuesArray(2) = parentR_TableRowByR_TableKOTGeneration(0)
2983             End If
2984             If (Not (parentRegistrationRowByRegistrationKOTGeneration) Is Nothing) Then
2985                 columnValuesArray(5) = parentRegistrationRowByRegistrationKOTGeneration(0)
2986             End If
2987             rowKOTGenerationRow.ItemArray = columnValuesArray
2988             Me.Rows.Add(rowKOTGenerationRow)
2989             Return rowKOTGenerationRow
2990         End Function
2991         
2992         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2993          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
2994         Public Function FindByTicketID(ByVal TicketID As Integer) As KOTGenerationRow
2995             Return CType(Me.Rows.Find(New Object() {TicketID}),KOTGenerationRow)
2996         End Function
2997         
2998         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
2999          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3000         Public Overrides Function Clone() As Global.System.Data.DataTable
3001             Dim cln As KOTGenerationDataTable = CType(MyBase.Clone,KOTGenerationDataTable)
3002             cln.InitVars
3003             Return cln
3004         End Function
3005         
3006         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3007          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3008         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
3009             Return New KOTGenerationDataTable()
3010         End Function
3011         
3012         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3013          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3014         Friend Sub InitVars()
3015             Me.columnTicketID = MyBase.Columns("TicketID")
3016             Me.columnBillDate = MyBase.Columns("BillDate")
3017             Me.columnTableNo = MyBase.Columns("TableNo")
3018             Me.columnGroupName = MyBase.Columns("GroupName")
3019             Me.columnGrandTotal = MyBase.Columns("GrandTotal")
3020             Me.columnOperatorID = MyBase.Columns("OperatorID")
3021             Me.columnBillNote = MyBase.Columns("BillNote")
3022             Me.columnStatus = MyBase.Columns("Status")
3023         End Sub
3024         
3025         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3026          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3027         Private Sub InitClass()
3028             Me.columnTicketID = New Global.System.Data.DataColumn("TicketID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
3029             MyBase.Columns.Add(Me.columnTicketID)
3030             Me.columnBillDate = New Global.System.Data.DataColumn("BillDate", GetType(Date), Nothing, Global.System.Data.MappingType.Element)
3031             MyBase.Columns.Add(Me.columnBillDate)
3032             Me.columnTableNo = New Global.System.Data.DataColumn("TableNo", GetType(String), Nothing, Global.System.Data.MappingType.Element)
3033             MyBase.Columns.Add(Me.columnTableNo)
3034             Me.columnGroupName = New Global.System.Data.DataColumn("GroupName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
3035             MyBase.Columns.Add(Me.columnGroupName)
3036             Me.columnGrandTotal = New Global.System.Data.DataColumn("GrandTotal", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3037             MyBase.Columns.Add(Me.columnGrandTotal)
3038             Me.columnOperatorID = New Global.System.Data.DataColumn("OperatorID", GetType(String), Nothing, Global.System.Data.MappingType.Element)
3039             MyBase.Columns.Add(Me.columnOperatorID)
3040             Me.columnBillNote = New Global.System.Data.DataColumn("BillNote", GetType(String), Nothing, Global.System.Data.MappingType.Element)
3041             MyBase.Columns.Add(Me.columnBillNote)
3042             Me.columnStatus = New Global.System.Data.DataColumn("Status", GetType(String), Nothing, Global.System.Data.MappingType.Element)
3043             MyBase.Columns.Add(Me.columnStatus)
3044             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnTicketID}, true))
3045             Me.columnTicketID.AllowDBNull = false
3046             Me.columnTicketID.Unique = true
3047             Me.columnTableNo.MaxLength = 255
3048             Me.columnGroupName.MaxLength = 255
3049             Me.columnOperatorID.MaxLength = 255
3050             Me.columnBillNote.MaxLength = 255
3051             Me.columnStatus.MaxLength = 255
3052         End Sub
3053         
3054         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3055          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3056         Public Function NewKOTGenerationRow() As KOTGenerationRow
3057             Return CType(Me.NewRow,KOTGenerationRow)
3058         End Function
3059         
3060         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3061          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3062         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
3063             Return New KOTGenerationRow(builder)
3064         End Function
3065         
3066         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3067          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3068         Protected Overrides Function GetRowType() As Global.System.Type
3069             Return GetType(KOTGenerationRow)
3070         End Function
3071         
3072         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3073          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3074         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3075             MyBase.OnRowChanged(e)
3076             If (Not (Me.KOTGenerationRowChangedEvent) Is Nothing) Then
3077                 RaiseEvent KOTGenerationRowChanged(Me, New KOTGenerationRowChangeEvent(CType(e.Row,KOTGenerationRow), e.Action))
3078             End If
3079         End Sub
3080         
3081         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3082          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3083         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3084             MyBase.OnRowChanging(e)
3085             If (Not (Me.KOTGenerationRowChangingEvent) Is Nothing) Then
3086                 RaiseEvent KOTGenerationRowChanging(Me, New KOTGenerationRowChangeEvent(CType(e.Row,KOTGenerationRow), e.Action))
3087             End If
3088         End Sub
3089         
3090         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3091          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3092         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3093             MyBase.OnRowDeleted(e)
3094             If (Not (Me.KOTGenerationRowDeletedEvent) Is Nothing) Then
3095                 RaiseEvent KOTGenerationRowDeleted(Me, New KOTGenerationRowChangeEvent(CType(e.Row,KOTGenerationRow), e.Action))
3096             End If
3097         End Sub
3098         
3099         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3100          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3101         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3102             MyBase.OnRowDeleting(e)
3103             If (Not (Me.KOTGenerationRowDeletingEvent) Is Nothing) Then
3104                 RaiseEvent KOTGenerationRowDeleting(Me, New KOTGenerationRowChangeEvent(CType(e.Row,KOTGenerationRow), e.Action))
3105             End If
3106         End Sub
3107         
3108         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3109          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3110         Public Sub RemoveKOTGenerationRow(ByVal row As KOTGenerationRow)
3111             Me.Rows.Remove(row)
3112         End Sub
3113         
3114         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3115          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3116         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
3117             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
3118             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
3119             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
3120             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
3121             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
3122             any1.MinOccurs = New Decimal(0)
3123             any1.MaxOccurs = Decimal.MaxValue
3124             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
3125             sequence.Items.Add(any1)
3126             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
3127             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
3128             any2.MinOccurs = New Decimal(1)
3129             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
3130             sequence.Items.Add(any2)
3131             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
3132             attribute1.Name = "namespace"
3133             attribute1.FixedValue = ds.Namespace
3134             type.Attributes.Add(attribute1)
3135             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
3136             attribute2.Name = "tableTypeName"
3137             attribute2.FixedValue = "KOTGenerationDataTable"
3138             type.Attributes.Add(attribute2)
3139             type.Particle = sequence
3140             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
3141             If xs.Contains(dsSchema.TargetNamespace) Then
3142                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
3143                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
3144                 Try
3145                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
3146                     dsSchema.Write(s1)
3147                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
3148                     Do While schemas.MoveNext
3149                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
3150                         s2.SetLength(0)
3151                         schema.Write(s2)
3152                         If (s1.Length = s2.Length) Then
3153                             s1.Position = 0
3154                             s2.Position = 0
3155                             
3156                             Do While ((s1.Position <> s1.Length) _
3157                                         AndAlso (s1.ReadByte = s2.ReadByte))
3158                                 
3159                                 
3160                             Loop
3161                             If (s1.Position = s1.Length) Then
3162                                 Return type
3163                             End If
3164                         End If
3165                         
3166                     Loop
3167                 Finally
3168                     If (Not (s1) Is Nothing) Then
3169                         s1.Close
3170                     End If
3171                     If (Not (s2) Is Nothing) Then
3172                         s2.Close
3173                     End If
3174                 End Try
3175             End If
3176             xs.Add(dsSchema)
3177             Return type
3178         End Function
3179     End Class
3180     
3181     '''<summary>
3182     '''Represents the strongly named DataTable class.
3183     '''</summary>
3184     <Global.System.Serializable(), _
3185      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
3186     Partial Public Class KOTGenerationItemsDataTable
3187         Inherits Global.System.Data.TypedTableBase(Of KOTGenerationItemsRow)
3188         
3189         Private columnKOT_ID As Global.System.Data.DataColumn
3190         
3191         Private columnTicket_ID As Global.System.Data.DataColumn
3192         
3193         Private columnItem_ID As Global.System.Data.DataColumn
3194         
3195         Private columnQty As Global.System.Data.DataColumn
3196         
3197         Private columnRate As Global.System.Data.DataColumn
3198         
3199         Private columnAmount As Global.System.Data.DataColumn
3200         
3201         Private columnDiscPer As Global.System.Data.DataColumn
3202         
3203         Private columnDisc As Global.System.Data.DataColumn
3204         
3205         Private columnVATPer As Global.System.Data.DataColumn
3206         
3207         Private columnVATAmt As Global.System.Data.DataColumn
3208         
3209         Private columnSTPer As Global.System.Data.DataColumn
3210         
3211         Private columnSTAmt As Global.System.Data.DataColumn
3212         
3213         Private columnSCPer As Global.System.Data.DataColumn
3214         
3215         Private columnSCAmt As Global.System.Data.DataColumn
3216         
3217         Private columnTotalAmt As Global.System.Data.DataColumn
3218         
3219         Private columnItemNote As Global.System.Data.DataColumn
3220         
3221         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3222          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3223         Public Sub New()
3224             MyBase.New
3225             Me.TableName = "KOTGenerationItems"
3226             Me.BeginInit
3227             Me.InitClass
3228             Me.EndInit
3229         End Sub
3230         
3231         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3232          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3233         Friend Sub New(ByVal table As Global.System.Data.DataTable)
3234             MyBase.New
3235             Me.TableName = table.TableName
3236             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
3237                 Me.CaseSensitive = table.CaseSensitive
3238             End If
3239             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
3240                 Me.Locale = table.Locale
3241             End If
3242             If (table.Namespace <> table.DataSet.Namespace) Then
3243                 Me.Namespace = table.Namespace
3244             End If
3245             Me.Prefix = table.Prefix
3246             Me.MinimumCapacity = table.MinimumCapacity
3247         End Sub
3248         
3249         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3250          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3251         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
3252             MyBase.New(info, context)
3253             Me.InitVars
3254         End Sub
3255         
3256         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3257          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3258         Public ReadOnly Property KOT_IDColumn() As Global.System.Data.DataColumn
3259             Get
3260                 Return Me.columnKOT_ID
3261             End Get
3262         End Property
3263         
3264         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3265          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3266         Public ReadOnly Property Ticket_IDColumn() As Global.System.Data.DataColumn
3267             Get
3268                 Return Me.columnTicket_ID
3269             End Get
3270         End Property
3271         
3272         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3273          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3274         Public ReadOnly Property Item_IDColumn() As Global.System.Data.DataColumn
3275             Get
3276                 Return Me.columnItem_ID
3277             End Get
3278         End Property
3279         
3280         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3281          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3282         Public ReadOnly Property QtyColumn() As Global.System.Data.DataColumn
3283             Get
3284                 Return Me.columnQty
3285             End Get
3286         End Property
3287         
3288         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3289          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3290         Public ReadOnly Property RateColumn() As Global.System.Data.DataColumn
3291             Get
3292                 Return Me.columnRate
3293             End Get
3294         End Property
3295         
3296         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3297          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3298         Public ReadOnly Property AmountColumn() As Global.System.Data.DataColumn
3299             Get
3300                 Return Me.columnAmount
3301             End Get
3302         End Property
3303         
3304         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3305          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3306         Public ReadOnly Property DiscPerColumn() As Global.System.Data.DataColumn
3307             Get
3308                 Return Me.columnDiscPer
3309             End Get
3310         End Property
3311         
3312         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3313          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3314         Public ReadOnly Property DiscColumn() As Global.System.Data.DataColumn
3315             Get
3316                 Return Me.columnDisc
3317             End Get
3318         End Property
3319         
3320         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3321          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3322         Public ReadOnly Property VATPerColumn() As Global.System.Data.DataColumn
3323             Get
3324                 Return Me.columnVATPer
3325             End Get
3326         End Property
3327         
3328         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3329          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3330         Public ReadOnly Property VATAmtColumn() As Global.System.Data.DataColumn
3331             Get
3332                 Return Me.columnVATAmt
3333             End Get
3334         End Property
3335         
3336         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3337          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3338         Public ReadOnly Property STPerColumn() As Global.System.Data.DataColumn
3339             Get
3340                 Return Me.columnSTPer
3341             End Get
3342         End Property
3343         
3344         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3345          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3346         Public ReadOnly Property STAmtColumn() As Global.System.Data.DataColumn
3347             Get
3348                 Return Me.columnSTAmt
3349             End Get
3350         End Property
3351         
3352         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3353          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3354         Public ReadOnly Property SCPerColumn() As Global.System.Data.DataColumn
3355             Get
3356                 Return Me.columnSCPer
3357             End Get
3358         End Property
3359         
3360         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3361          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3362         Public ReadOnly Property SCAmtColumn() As Global.System.Data.DataColumn
3363             Get
3364                 Return Me.columnSCAmt
3365             End Get
3366         End Property
3367         
3368         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3369          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3370         Public ReadOnly Property TotalAmtColumn() As Global.System.Data.DataColumn
3371             Get
3372                 Return Me.columnTotalAmt
3373             End Get
3374         End Property
3375         
3376         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3377          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3378         Public ReadOnly Property ItemNoteColumn() As Global.System.Data.DataColumn
3379             Get
3380                 Return Me.columnItemNote
3381             End Get
3382         End Property
3383         
3384         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3385          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
3386          Global.System.ComponentModel.Browsable(false)> _
3387         Public ReadOnly Property Count() As Integer
3388             Get
3389                 Return Me.Rows.Count
3390             End Get
3391         End Property
3392         
3393         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3394          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3395         Public Default ReadOnly Property Item(ByVal index As Integer) As KOTGenerationItemsRow
3396             Get
3397                 Return CType(Me.Rows(index),KOTGenerationItemsRow)
3398             End Get
3399         End Property
3400         
3401         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3402         Public Event KOTGenerationItemsRowChanging As KOTGenerationItemsRowChangeEventHandler
3403         
3404         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3405         Public Event KOTGenerationItemsRowChanged As KOTGenerationItemsRowChangeEventHandler
3406         
3407         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3408         Public Event KOTGenerationItemsRowDeleting As KOTGenerationItemsRowChangeEventHandler
3409         
3410         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3411         Public Event KOTGenerationItemsRowDeleted As KOTGenerationItemsRowChangeEventHandler
3412         
3413         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3414          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3415         Public Overloads Sub AddKOTGenerationItemsRow(ByVal row As KOTGenerationItemsRow)
3416             Me.Rows.Add(row)
3417         End Sub
3418         
3419         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3420          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3421         Public Overloads Function AddKOTGenerationItemsRow(ByVal parentKOTGenerationRowByKOTGenerationKOTGenerationItems As KOTGenerationRow, ByVal parentDishRowByDishKOTGenerationItems As DishRow, ByVal Qty As Decimal, ByVal Rate As Decimal, ByVal Amount As Decimal, ByVal DiscPer As Decimal, ByVal Disc As Decimal, ByVal VATPer As Decimal, ByVal VATAmt As Decimal, ByVal STPer As Decimal, ByVal STAmt As Decimal, ByVal SCPer As Decimal, ByVal SCAmt As Decimal, ByVal TotalAmt As Decimal, ByVal ItemNote As String) As KOTGenerationItemsRow
3422             Dim rowKOTGenerationItemsRow As KOTGenerationItemsRow = CType(Me.NewRow,KOTGenerationItemsRow)
3423             Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, Nothing, Qty, Rate, Amount, DiscPer, Disc, VATPer, VATAmt, STPer, STAmt, SCPer, SCAmt, TotalAmt, ItemNote}
3424             If (Not (parentKOTGenerationRowByKOTGenerationKOTGenerationItems) Is Nothing) Then
3425                 columnValuesArray(1) = parentKOTGenerationRowByKOTGenerationKOTGenerationItems(0)
3426             End If
3427             If (Not (parentDishRowByDishKOTGenerationItems) Is Nothing) Then
3428                 columnValuesArray(2) = parentDishRowByDishKOTGenerationItems(0)
3429             End If
3430             rowKOTGenerationItemsRow.ItemArray = columnValuesArray
3431             Me.Rows.Add(rowKOTGenerationItemsRow)
3432             Return rowKOTGenerationItemsRow
3433         End Function
3434         
3435         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3436          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3437         Public Function FindByKOT_ID(ByVal KOT_ID As Integer) As KOTGenerationItemsRow
3438             Return CType(Me.Rows.Find(New Object() {KOT_ID}),KOTGenerationItemsRow)
3439         End Function
3440         
3441         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3442          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3443         Public Overrides Function Clone() As Global.System.Data.DataTable
3444             Dim cln As KOTGenerationItemsDataTable = CType(MyBase.Clone,KOTGenerationItemsDataTable)
3445             cln.InitVars
3446             Return cln
3447         End Function
3448         
3449         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3450          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3451         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
3452             Return New KOTGenerationItemsDataTable()
3453         End Function
3454         
3455         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3456          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3457         Friend Sub InitVars()
3458             Me.columnKOT_ID = MyBase.Columns("KOT_ID")
3459             Me.columnTicket_ID = MyBase.Columns("Ticket_ID")
3460             Me.columnItem_ID = MyBase.Columns("Item_ID")
3461             Me.columnQty = MyBase.Columns("Qty")
3462             Me.columnRate = MyBase.Columns("Rate")
3463             Me.columnAmount = MyBase.Columns("Amount")
3464             Me.columnDiscPer = MyBase.Columns("DiscPer")
3465             Me.columnDisc = MyBase.Columns("Disc")
3466             Me.columnVATPer = MyBase.Columns("VATPer")
3467             Me.columnVATAmt = MyBase.Columns("VATAmt")
3468             Me.columnSTPer = MyBase.Columns("STPer")
3469             Me.columnSTAmt = MyBase.Columns("STAmt")
3470             Me.columnSCPer = MyBase.Columns("SCPer")
3471             Me.columnSCAmt = MyBase.Columns("SCAmt")
3472             Me.columnTotalAmt = MyBase.Columns("TotalAmt")
3473             Me.columnItemNote = MyBase.Columns("ItemNote")
3474         End Sub
3475         
3476         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3477          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3478         Private Sub InitClass()
3479             Me.columnKOT_ID = New Global.System.Data.DataColumn("KOT_ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
3480             MyBase.Columns.Add(Me.columnKOT_ID)
3481             Me.columnTicket_ID = New Global.System.Data.DataColumn("Ticket_ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
3482             MyBase.Columns.Add(Me.columnTicket_ID)
3483             Me.columnItem_ID = New Global.System.Data.DataColumn("Item_ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
3484             MyBase.Columns.Add(Me.columnItem_ID)
3485             Me.columnQty = New Global.System.Data.DataColumn("Qty", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3486             MyBase.Columns.Add(Me.columnQty)
3487             Me.columnRate = New Global.System.Data.DataColumn("Rate", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3488             MyBase.Columns.Add(Me.columnRate)
3489             Me.columnAmount = New Global.System.Data.DataColumn("Amount", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3490             MyBase.Columns.Add(Me.columnAmount)
3491             Me.columnDiscPer = New Global.System.Data.DataColumn("DiscPer", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3492             MyBase.Columns.Add(Me.columnDiscPer)
3493             Me.columnDisc = New Global.System.Data.DataColumn("Disc", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3494             MyBase.Columns.Add(Me.columnDisc)
3495             Me.columnVATPer = New Global.System.Data.DataColumn("VATPer", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3496             MyBase.Columns.Add(Me.columnVATPer)
3497             Me.columnVATAmt = New Global.System.Data.DataColumn("VATAmt", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3498             MyBase.Columns.Add(Me.columnVATAmt)
3499             Me.columnSTPer = New Global.System.Data.DataColumn("STPer", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3500             MyBase.Columns.Add(Me.columnSTPer)
3501             Me.columnSTAmt = New Global.System.Data.DataColumn("STAmt", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3502             MyBase.Columns.Add(Me.columnSTAmt)
3503             Me.columnSCPer = New Global.System.Data.DataColumn("SCPer", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3504             MyBase.Columns.Add(Me.columnSCPer)
3505             Me.columnSCAmt = New Global.System.Data.DataColumn("SCAmt", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3506             MyBase.Columns.Add(Me.columnSCAmt)
3507             Me.columnTotalAmt = New Global.System.Data.DataColumn("TotalAmt", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
3508             MyBase.Columns.Add(Me.columnTotalAmt)
3509             Me.columnItemNote = New Global.System.Data.DataColumn("ItemNote", GetType(String), Nothing, Global.System.Data.MappingType.Element)
3510             MyBase.Columns.Add(Me.columnItemNote)
3511             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnKOT_ID}, true))
3512             Me.columnKOT_ID.AutoIncrement = true
3513             Me.columnKOT_ID.AutoIncrementSeed = -1
3514             Me.columnKOT_ID.AutoIncrementStep = -1
3515             Me.columnKOT_ID.AllowDBNull = false
3516             Me.columnKOT_ID.Unique = true
3517             Me.columnItemNote.MaxLength = 255
3518         End Sub
3519         
3520         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3521          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3522         Public Function NewKOTGenerationItemsRow() As KOTGenerationItemsRow
3523             Return CType(Me.NewRow,KOTGenerationItemsRow)
3524         End Function
3525         
3526         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3527          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3528         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
3529             Return New KOTGenerationItemsRow(builder)
3530         End Function
3531         
3532         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3533          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3534         Protected Overrides Function GetRowType() As Global.System.Type
3535             Return GetType(KOTGenerationItemsRow)
3536         End Function
3537         
3538         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3539          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3540         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3541             MyBase.OnRowChanged(e)
3542             If (Not (Me.KOTGenerationItemsRowChangedEvent) Is Nothing) Then
3543                 RaiseEvent KOTGenerationItemsRowChanged(Me, New KOTGenerationItemsRowChangeEvent(CType(e.Row,KOTGenerationItemsRow), e.Action))
3544             End If
3545         End Sub
3546         
3547         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3548          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3549         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3550             MyBase.OnRowChanging(e)
3551             If (Not (Me.KOTGenerationItemsRowChangingEvent) Is Nothing) Then
3552                 RaiseEvent KOTGenerationItemsRowChanging(Me, New KOTGenerationItemsRowChangeEvent(CType(e.Row,KOTGenerationItemsRow), e.Action))
3553             End If
3554         End Sub
3555         
3556         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3557          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3558         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3559             MyBase.OnRowDeleted(e)
3560             If (Not (Me.KOTGenerationItemsRowDeletedEvent) Is Nothing) Then
3561                 RaiseEvent KOTGenerationItemsRowDeleted(Me, New KOTGenerationItemsRowChangeEvent(CType(e.Row,KOTGenerationItemsRow), e.Action))
3562             End If
3563         End Sub
3564         
3565         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3566          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3567         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3568             MyBase.OnRowDeleting(e)
3569             If (Not (Me.KOTGenerationItemsRowDeletingEvent) Is Nothing) Then
3570                 RaiseEvent KOTGenerationItemsRowDeleting(Me, New KOTGenerationItemsRowChangeEvent(CType(e.Row,KOTGenerationItemsRow), e.Action))
3571             End If
3572         End Sub
3573         
3574         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3575          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3576         Public Sub RemoveKOTGenerationItemsRow(ByVal row As KOTGenerationItemsRow)
3577             Me.Rows.Remove(row)
3578         End Sub
3579         
3580         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3581          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3582         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
3583             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
3584             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
3585             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
3586             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
3587             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
3588             any1.MinOccurs = New Decimal(0)
3589             any1.MaxOccurs = Decimal.MaxValue
3590             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
3591             sequence.Items.Add(any1)
3592             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
3593             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
3594             any2.MinOccurs = New Decimal(1)
3595             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
3596             sequence.Items.Add(any2)
3597             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
3598             attribute1.Name = "namespace"
3599             attribute1.FixedValue = ds.Namespace
3600             type.Attributes.Add(attribute1)
3601             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
3602             attribute2.Name = "tableTypeName"
3603             attribute2.FixedValue = "KOTGenerationItemsDataTable"
3604             type.Attributes.Add(attribute2)
3605             type.Particle = sequence
3606             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
3607             If xs.Contains(dsSchema.TargetNamespace) Then
3608                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
3609                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
3610                 Try
3611                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
3612                     dsSchema.Write(s1)
3613                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
3614                     Do While schemas.MoveNext
3615                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
3616                         s2.SetLength(0)
3617                         schema.Write(s2)
3618                         If (s1.Length = s2.Length) Then
3619                             s1.Position = 0
3620                             s2.Position = 0
3621                             
3622                             Do While ((s1.Position <> s1.Length) _
3623                                         AndAlso (s1.ReadByte = s2.ReadByte))
3624                                 
3625                                 
3626                             Loop
3627                             If (s1.Position = s1.Length) Then
3628                                 Return type
3629                             End If
3630                         End If
3631                         
3632                     Loop
3633                 Finally
3634                     If (Not (s1) Is Nothing) Then
3635                         s1.Close
3636                     End If
3637                     If (Not (s2) Is Nothing) Then
3638                         s2.Close
3639                     End If
3640                 End Try
3641             End If
3642             xs.Add(dsSchema)
3643             Return type
3644         End Function
3645     End Class
3646     
3647     '''<summary>
3648     '''Represents the strongly named DataTable class.
3649     '''</summary>
3650     <Global.System.Serializable(), _
3651      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
3652     Partial Public Class LogsDataTable
3653         Inherits Global.System.Data.TypedTableBase(Of LogsRow)
3654         
3655         Private columnID As Global.System.Data.DataColumn
3656         
3657         Private columnUserID As Global.System.Data.DataColumn
3658         
3659         Private columnOperation As Global.System.Data.DataColumn
3660         
3661         Private columnDate As Global.System.Data.DataColumn
3662         
3663         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3664          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3665         Public Sub New()
3666             MyBase.New
3667             Me.TableName = "Logs"
3668             Me.BeginInit
3669             Me.InitClass
3670             Me.EndInit
3671         End Sub
3672         
3673         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3674          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3675         Friend Sub New(ByVal table As Global.System.Data.DataTable)
3676             MyBase.New
3677             Me.TableName = table.TableName
3678             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
3679                 Me.CaseSensitive = table.CaseSensitive
3680             End If
3681             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
3682                 Me.Locale = table.Locale
3683             End If
3684             If (table.Namespace <> table.DataSet.Namespace) Then
3685                 Me.Namespace = table.Namespace
3686             End If
3687             Me.Prefix = table.Prefix
3688             Me.MinimumCapacity = table.MinimumCapacity
3689         End Sub
3690         
3691         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3692          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3693         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
3694             MyBase.New(info, context)
3695             Me.InitVars
3696         End Sub
3697         
3698         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3699          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3700         Public ReadOnly Property IDColumn() As Global.System.Data.DataColumn
3701             Get
3702                 Return Me.columnID
3703             End Get
3704         End Property
3705         
3706         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3707          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3708         Public ReadOnly Property UserIDColumn() As Global.System.Data.DataColumn
3709             Get
3710                 Return Me.columnUserID
3711             End Get
3712         End Property
3713         
3714         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3715          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3716         Public ReadOnly Property OperationColumn() As Global.System.Data.DataColumn
3717             Get
3718                 Return Me.columnOperation
3719             End Get
3720         End Property
3721         
3722         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3723          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3724         Public ReadOnly Property DateColumn() As Global.System.Data.DataColumn
3725             Get
3726                 Return Me.columnDate
3727             End Get
3728         End Property
3729         
3730         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3731          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
3732          Global.System.ComponentModel.Browsable(false)> _
3733         Public ReadOnly Property Count() As Integer
3734             Get
3735                 Return Me.Rows.Count
3736             End Get
3737         End Property
3738         
3739         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3740          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3741         Public Default ReadOnly Property Item(ByVal index As Integer) As LogsRow
3742             Get
3743                 Return CType(Me.Rows(index),LogsRow)
3744             End Get
3745         End Property
3746         
3747         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3748         Public Event LogsRowChanging As LogsRowChangeEventHandler
3749         
3750         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3751         Public Event LogsRowChanged As LogsRowChangeEventHandler
3752         
3753         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3754         Public Event LogsRowDeleting As LogsRowChangeEventHandler
3755         
3756         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3757         Public Event LogsRowDeleted As LogsRowChangeEventHandler
3758         
3759         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3760          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3761         Public Overloads Sub AddLogsRow(ByVal row As LogsRow)
3762             Me.Rows.Add(row)
3763         End Sub
3764         
3765         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3766          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3767         Public Overloads Function AddLogsRow(ByVal parentRegistrationRowByRegistrationLogs As RegistrationRow, ByVal Operation As String, ByVal _Date As Date) As LogsRow
3768             Dim rowLogsRow As LogsRow = CType(Me.NewRow,LogsRow)
3769             Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, Operation, _Date}
3770             If (Not (parentRegistrationRowByRegistrationLogs) Is Nothing) Then
3771                 columnValuesArray(1) = parentRegistrationRowByRegistrationLogs(0)
3772             End If
3773             rowLogsRow.ItemArray = columnValuesArray
3774             Me.Rows.Add(rowLogsRow)
3775             Return rowLogsRow
3776         End Function
3777         
3778         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3779          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3780         Public Function FindByID(ByVal ID As Integer) As LogsRow
3781             Return CType(Me.Rows.Find(New Object() {ID}),LogsRow)
3782         End Function
3783         
3784         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3785          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3786         Public Overrides Function Clone() As Global.System.Data.DataTable
3787             Dim cln As LogsDataTable = CType(MyBase.Clone,LogsDataTable)
3788             cln.InitVars
3789             Return cln
3790         End Function
3791         
3792         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3793          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3794         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
3795             Return New LogsDataTable()
3796         End Function
3797         
3798         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3799          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3800         Friend Sub InitVars()
3801             Me.columnID = MyBase.Columns("ID")
3802             Me.columnUserID = MyBase.Columns("UserID")
3803             Me.columnOperation = MyBase.Columns("Operation")
3804             Me.columnDate = MyBase.Columns("Date")
3805         End Sub
3806         
3807         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3808          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3809         Private Sub InitClass()
3810             Me.columnID = New Global.System.Data.DataColumn("ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
3811             MyBase.Columns.Add(Me.columnID)
3812             Me.columnUserID = New Global.System.Data.DataColumn("UserID", GetType(String), Nothing, Global.System.Data.MappingType.Element)
3813             MyBase.Columns.Add(Me.columnUserID)
3814             Me.columnOperation = New Global.System.Data.DataColumn("Operation", GetType(String), Nothing, Global.System.Data.MappingType.Element)
3815             MyBase.Columns.Add(Me.columnOperation)
3816             Me.columnDate = New Global.System.Data.DataColumn("Date", GetType(Date), Nothing, Global.System.Data.MappingType.Element)
3817             Me.columnDate.ExtendedProperties.Add("Generator_ColumnPropNameInTable", "DateColumn")
3818             Me.columnDate.ExtendedProperties.Add("Generator_ColumnVarNameInTable", "columnDate")
3819             Me.columnDate.ExtendedProperties.Add("Generator_UserColumnName", "Date")
3820             MyBase.Columns.Add(Me.columnDate)
3821             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnID}, true))
3822             Me.columnID.AutoIncrement = true
3823             Me.columnID.AutoIncrementSeed = -1
3824             Me.columnID.AutoIncrementStep = -1
3825             Me.columnID.AllowDBNull = false
3826             Me.columnID.Unique = true
3827             Me.columnUserID.MaxLength = 255
3828             Me.columnOperation.MaxLength = 255
3829         End Sub
3830         
3831         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3832          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3833         Public Function NewLogsRow() As LogsRow
3834             Return CType(Me.NewRow,LogsRow)
3835         End Function
3836         
3837         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3838          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3839         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
3840             Return New LogsRow(builder)
3841         End Function
3842         
3843         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3844          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3845         Protected Overrides Function GetRowType() As Global.System.Type
3846             Return GetType(LogsRow)
3847         End Function
3848         
3849         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3850          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3851         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3852             MyBase.OnRowChanged(e)
3853             If (Not (Me.LogsRowChangedEvent) Is Nothing) Then
3854                 RaiseEvent LogsRowChanged(Me, New LogsRowChangeEvent(CType(e.Row,LogsRow), e.Action))
3855             End If
3856         End Sub
3857         
3858         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3859          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3860         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3861             MyBase.OnRowChanging(e)
3862             If (Not (Me.LogsRowChangingEvent) Is Nothing) Then
3863                 RaiseEvent LogsRowChanging(Me, New LogsRowChangeEvent(CType(e.Row,LogsRow), e.Action))
3864             End If
3865         End Sub
3866         
3867         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3868          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3869         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3870             MyBase.OnRowDeleted(e)
3871             If (Not (Me.LogsRowDeletedEvent) Is Nothing) Then
3872                 RaiseEvent LogsRowDeleted(Me, New LogsRowChangeEvent(CType(e.Row,LogsRow), e.Action))
3873             End If
3874         End Sub
3875         
3876         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3877          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3878         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
3879             MyBase.OnRowDeleting(e)
3880             If (Not (Me.LogsRowDeletingEvent) Is Nothing) Then
3881                 RaiseEvent LogsRowDeleting(Me, New LogsRowChangeEvent(CType(e.Row,LogsRow), e.Action))
3882             End If
3883         End Sub
3884         
3885         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3886          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3887         Public Sub RemoveLogsRow(ByVal row As LogsRow)
3888             Me.Rows.Remove(row)
3889         End Sub
3890         
3891         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3892          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3893         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
3894             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
3895             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
3896             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
3897             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
3898             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
3899             any1.MinOccurs = New Decimal(0)
3900             any1.MaxOccurs = Decimal.MaxValue
3901             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
3902             sequence.Items.Add(any1)
3903             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
3904             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
3905             any2.MinOccurs = New Decimal(1)
3906             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
3907             sequence.Items.Add(any2)
3908             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
3909             attribute1.Name = "namespace"
3910             attribute1.FixedValue = ds.Namespace
3911             type.Attributes.Add(attribute1)
3912             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
3913             attribute2.Name = "tableTypeName"
3914             attribute2.FixedValue = "LogsDataTable"
3915             type.Attributes.Add(attribute2)
3916             type.Particle = sequence
3917             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
3918             If xs.Contains(dsSchema.TargetNamespace) Then
3919                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
3920                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
3921                 Try
3922                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
3923                     dsSchema.Write(s1)
3924                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
3925                     Do While schemas.MoveNext
3926                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
3927                         s2.SetLength(0)
3928                         schema.Write(s2)
3929                         If (s1.Length = s2.Length) Then
3930                             s1.Position = 0
3931                             s2.Position = 0
3932                             
3933                             Do While ((s1.Position <> s1.Length) _
3934                                         AndAlso (s1.ReadByte = s2.ReadByte))
3935                                 
3936                                 
3937                             Loop
3938                             If (s1.Position = s1.Length) Then
3939                                 Return type
3940                             End If
3941                         End If
3942                         
3943                     Loop
3944                 Finally
3945                     If (Not (s1) Is Nothing) Then
3946                         s1.Close
3947                     End If
3948                     If (Not (s2) Is Nothing) Then
3949                         s2.Close
3950                     End If
3951                 End Try
3952             End If
3953             xs.Add(dsSchema)
3954             Return type
3955         End Function
3956     End Class
3957     
3958     '''<summary>
3959     '''Represents the strongly named DataTable class.
3960     '''</summary>
3961     <Global.System.Serializable(), _
3962      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
3963     Partial Public Class NotesMasterDataTable
3964         Inherits Global.System.Data.TypedTableBase(Of NotesMasterRow)
3965         
3966         Private columnId As Global.System.Data.DataColumn
3967         
3968         Private columnNotes As Global.System.Data.DataColumn
3969         
3970         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3971          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3972         Public Sub New()
3973             MyBase.New
3974             Me.TableName = "NotesMaster"
3975             Me.BeginInit
3976             Me.InitClass
3977             Me.EndInit
3978         End Sub
3979         
3980         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3981          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
3982         Friend Sub New(ByVal table As Global.System.Data.DataTable)
3983             MyBase.New
3984             Me.TableName = table.TableName
3985             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
3986                 Me.CaseSensitive = table.CaseSensitive
3987             End If
3988             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
3989                 Me.Locale = table.Locale
3990             End If
3991             If (table.Namespace <> table.DataSet.Namespace) Then
3992                 Me.Namespace = table.Namespace
3993             End If
3994             Me.Prefix = table.Prefix
3995             Me.MinimumCapacity = table.MinimumCapacity
3996         End Sub
3997         
3998         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
3999          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4000         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
4001             MyBase.New(info, context)
4002             Me.InitVars
4003         End Sub
4004         
4005         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4006          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4007         Public ReadOnly Property IdColumn() As Global.System.Data.DataColumn
4008             Get
4009                 Return Me.columnId
4010             End Get
4011         End Property
4012         
4013         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4014          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4015         Public ReadOnly Property NotesColumn() As Global.System.Data.DataColumn
4016             Get
4017                 Return Me.columnNotes
4018             End Get
4019         End Property
4020         
4021         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4022          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
4023          Global.System.ComponentModel.Browsable(false)> _
4024         Public ReadOnly Property Count() As Integer
4025             Get
4026                 Return Me.Rows.Count
4027             End Get
4028         End Property
4029         
4030         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4031          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4032         Public Default ReadOnly Property Item(ByVal index As Integer) As NotesMasterRow
4033             Get
4034                 Return CType(Me.Rows(index),NotesMasterRow)
4035             End Get
4036         End Property
4037         
4038         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4039         Public Event NotesMasterRowChanging As NotesMasterRowChangeEventHandler
4040         
4041         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4042         Public Event NotesMasterRowChanged As NotesMasterRowChangeEventHandler
4043         
4044         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4045         Public Event NotesMasterRowDeleting As NotesMasterRowChangeEventHandler
4046         
4047         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4048         Public Event NotesMasterRowDeleted As NotesMasterRowChangeEventHandler
4049         
4050         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4051          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4052         Public Overloads Sub AddNotesMasterRow(ByVal row As NotesMasterRow)
4053             Me.Rows.Add(row)
4054         End Sub
4055         
4056         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4057          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4058         Public Overloads Function AddNotesMasterRow(ByVal Notes As String) As NotesMasterRow
4059             Dim rowNotesMasterRow As NotesMasterRow = CType(Me.NewRow,NotesMasterRow)
4060             Dim columnValuesArray() As Object = New Object() {Nothing, Notes}
4061             rowNotesMasterRow.ItemArray = columnValuesArray
4062             Me.Rows.Add(rowNotesMasterRow)
4063             Return rowNotesMasterRow
4064         End Function
4065         
4066         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4067          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4068         Public Function FindById(ByVal Id As Integer) As NotesMasterRow
4069             Return CType(Me.Rows.Find(New Object() {Id}),NotesMasterRow)
4070         End Function
4071         
4072         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4073          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4074         Public Overrides Function Clone() As Global.System.Data.DataTable
4075             Dim cln As NotesMasterDataTable = CType(MyBase.Clone,NotesMasterDataTable)
4076             cln.InitVars
4077             Return cln
4078         End Function
4079         
4080         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4081          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4082         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
4083             Return New NotesMasterDataTable()
4084         End Function
4085         
4086         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4087          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4088         Friend Sub InitVars()
4089             Me.columnId = MyBase.Columns("Id")
4090             Me.columnNotes = MyBase.Columns("Notes")
4091         End Sub
4092         
4093         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4094          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4095         Private Sub InitClass()
4096             Me.columnId = New Global.System.Data.DataColumn("Id", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
4097             MyBase.Columns.Add(Me.columnId)
4098             Me.columnNotes = New Global.System.Data.DataColumn("Notes", GetType(String), Nothing, Global.System.Data.MappingType.Element)
4099             MyBase.Columns.Add(Me.columnNotes)
4100             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnId}, true))
4101             Me.columnId.AutoIncrement = true
4102             Me.columnId.AutoIncrementSeed = -1
4103             Me.columnId.AutoIncrementStep = -1
4104             Me.columnId.AllowDBNull = false
4105             Me.columnId.Unique = true
4106             Me.columnNotes.MaxLength = 255
4107         End Sub
4108         
4109         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4110          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4111         Public Function NewNotesMasterRow() As NotesMasterRow
4112             Return CType(Me.NewRow,NotesMasterRow)
4113         End Function
4114         
4115         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4116          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4117         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
4118             Return New NotesMasterRow(builder)
4119         End Function
4120         
4121         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4122          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4123         Protected Overrides Function GetRowType() As Global.System.Type
4124             Return GetType(NotesMasterRow)
4125         End Function
4126         
4127         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4128          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4129         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4130             MyBase.OnRowChanged(e)
4131             If (Not (Me.NotesMasterRowChangedEvent) Is Nothing) Then
4132                 RaiseEvent NotesMasterRowChanged(Me, New NotesMasterRowChangeEvent(CType(e.Row,NotesMasterRow), e.Action))
4133             End If
4134         End Sub
4135         
4136         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4137          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4138         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4139             MyBase.OnRowChanging(e)
4140             If (Not (Me.NotesMasterRowChangingEvent) Is Nothing) Then
4141                 RaiseEvent NotesMasterRowChanging(Me, New NotesMasterRowChangeEvent(CType(e.Row,NotesMasterRow), e.Action))
4142             End If
4143         End Sub
4144         
4145         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4146          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4147         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4148             MyBase.OnRowDeleted(e)
4149             If (Not (Me.NotesMasterRowDeletedEvent) Is Nothing) Then
4150                 RaiseEvent NotesMasterRowDeleted(Me, New NotesMasterRowChangeEvent(CType(e.Row,NotesMasterRow), e.Action))
4151             End If
4152         End Sub
4153         
4154         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4155          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4156         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4157             MyBase.OnRowDeleting(e)
4158             If (Not (Me.NotesMasterRowDeletingEvent) Is Nothing) Then
4159                 RaiseEvent NotesMasterRowDeleting(Me, New NotesMasterRowChangeEvent(CType(e.Row,NotesMasterRow), e.Action))
4160             End If
4161         End Sub
4162         
4163         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4164          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4165         Public Sub RemoveNotesMasterRow(ByVal row As NotesMasterRow)
4166             Me.Rows.Remove(row)
4167         End Sub
4168         
4169         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4170          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4171         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
4172             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
4173             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
4174             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
4175             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
4176             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
4177             any1.MinOccurs = New Decimal(0)
4178             any1.MaxOccurs = Decimal.MaxValue
4179             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
4180             sequence.Items.Add(any1)
4181             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
4182             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
4183             any2.MinOccurs = New Decimal(1)
4184             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
4185             sequence.Items.Add(any2)
4186             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
4187             attribute1.Name = "namespace"
4188             attribute1.FixedValue = ds.Namespace
4189             type.Attributes.Add(attribute1)
4190             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
4191             attribute2.Name = "tableTypeName"
4192             attribute2.FixedValue = "NotesMasterDataTable"
4193             type.Attributes.Add(attribute2)
4194             type.Particle = sequence
4195             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
4196             If xs.Contains(dsSchema.TargetNamespace) Then
4197                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
4198                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
4199                 Try
4200                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
4201                     dsSchema.Write(s1)
4202                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
4203                     Do While schemas.MoveNext
4204                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
4205                         s2.SetLength(0)
4206                         schema.Write(s2)
4207                         If (s1.Length = s2.Length) Then
4208                             s1.Position = 0
4209                             s2.Position = 0
4210                             
4211                             Do While ((s1.Position <> s1.Length) _
4212                                         AndAlso (s1.ReadByte = s2.ReadByte))
4213                                 
4214                                 
4215                             Loop
4216                             If (s1.Position = s1.Length) Then
4217                                 Return type
4218                             End If
4219                         End If
4220                         
4221                     Loop
4222                 Finally
4223                     If (Not (s1) Is Nothing) Then
4224                         s1.Close
4225                     End If
4226                     If (Not (s2) Is Nothing) Then
4227                         s2.Close
4228                     End If
4229                 End Try
4230             End If
4231             xs.Add(dsSchema)
4232             Return type
4233         End Function
4234     End Class
4235     
4236     '''<summary>
4237     '''Represents the strongly named DataTable class.
4238     '''</summary>
4239     <Global.System.Serializable(), _
4240      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
4241     Partial Public Class POSGroupingDataTable
4242         Inherits Global.System.Data.TypedTableBase(Of POSGroupingRow)
4243         
4244         Private columnId As Global.System.Data.DataColumn
4245         
4246         Private columnCol1 As Global.System.Data.DataColumn
4247         
4248         Private columnCol2 As Global.System.Data.DataColumn
4249         
4250         Private columnCol3 As Global.System.Data.DataColumn
4251         
4252         Private columnCol4 As Global.System.Data.DataColumn
4253         
4254         Private columnCol5 As Global.System.Data.DataColumn
4255         
4256         Private columnCol6 As Global.System.Data.DataColumn
4257         
4258         Private columnCol7 As Global.System.Data.DataColumn
4259         
4260         Private columnCol8 As Global.System.Data.DataColumn
4261         
4262         Private columnCol9 As Global.System.Data.DataColumn
4263         
4264         Private columnCol10 As Global.System.Data.DataColumn
4265         
4266         Private columnCol11 As Global.System.Data.DataColumn
4267         
4268         Private columnCol12 As Global.System.Data.DataColumn
4269         
4270         Private columnCol13 As Global.System.Data.DataColumn
4271         
4272         Private columnCol14 As Global.System.Data.DataColumn
4273         
4274         Private columnCol15 As Global.System.Data.DataColumn
4275         
4276         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4277          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4278         Public Sub New()
4279             MyBase.New
4280             Me.TableName = "POSGrouping"
4281             Me.BeginInit
4282             Me.InitClass
4283             Me.EndInit
4284         End Sub
4285         
4286         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4287          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4288         Friend Sub New(ByVal table As Global.System.Data.DataTable)
4289             MyBase.New
4290             Me.TableName = table.TableName
4291             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
4292                 Me.CaseSensitive = table.CaseSensitive
4293             End If
4294             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
4295                 Me.Locale = table.Locale
4296             End If
4297             If (table.Namespace <> table.DataSet.Namespace) Then
4298                 Me.Namespace = table.Namespace
4299             End If
4300             Me.Prefix = table.Prefix
4301             Me.MinimumCapacity = table.MinimumCapacity
4302         End Sub
4303         
4304         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4305          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4306         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
4307             MyBase.New(info, context)
4308             Me.InitVars
4309         End Sub
4310         
4311         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4312          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4313         Public ReadOnly Property IdColumn() As Global.System.Data.DataColumn
4314             Get
4315                 Return Me.columnId
4316             End Get
4317         End Property
4318         
4319         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4320          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4321         Public ReadOnly Property Col1Column() As Global.System.Data.DataColumn
4322             Get
4323                 Return Me.columnCol1
4324             End Get
4325         End Property
4326         
4327         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4328          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4329         Public ReadOnly Property Col2Column() As Global.System.Data.DataColumn
4330             Get
4331                 Return Me.columnCol2
4332             End Get
4333         End Property
4334         
4335         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4336          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4337         Public ReadOnly Property Col3Column() As Global.System.Data.DataColumn
4338             Get
4339                 Return Me.columnCol3
4340             End Get
4341         End Property
4342         
4343         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4344          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4345         Public ReadOnly Property Col4Column() As Global.System.Data.DataColumn
4346             Get
4347                 Return Me.columnCol4
4348             End Get
4349         End Property
4350         
4351         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4352          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4353         Public ReadOnly Property Col5Column() As Global.System.Data.DataColumn
4354             Get
4355                 Return Me.columnCol5
4356             End Get
4357         End Property
4358         
4359         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4360          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4361         Public ReadOnly Property Col6Column() As Global.System.Data.DataColumn
4362             Get
4363                 Return Me.columnCol6
4364             End Get
4365         End Property
4366         
4367         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4368          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4369         Public ReadOnly Property Col7Column() As Global.System.Data.DataColumn
4370             Get
4371                 Return Me.columnCol7
4372             End Get
4373         End Property
4374         
4375         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4376          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4377         Public ReadOnly Property Col8Column() As Global.System.Data.DataColumn
4378             Get
4379                 Return Me.columnCol8
4380             End Get
4381         End Property
4382         
4383         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4384          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4385         Public ReadOnly Property Col9Column() As Global.System.Data.DataColumn
4386             Get
4387                 Return Me.columnCol9
4388             End Get
4389         End Property
4390         
4391         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4392          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4393         Public ReadOnly Property Col10Column() As Global.System.Data.DataColumn
4394             Get
4395                 Return Me.columnCol10
4396             End Get
4397         End Property
4398         
4399         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4400          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4401         Public ReadOnly Property Col11Column() As Global.System.Data.DataColumn
4402             Get
4403                 Return Me.columnCol11
4404             End Get
4405         End Property
4406         
4407         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4408          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4409         Public ReadOnly Property Col12Column() As Global.System.Data.DataColumn
4410             Get
4411                 Return Me.columnCol12
4412             End Get
4413         End Property
4414         
4415         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4416          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4417         Public ReadOnly Property Col13Column() As Global.System.Data.DataColumn
4418             Get
4419                 Return Me.columnCol13
4420             End Get
4421         End Property
4422         
4423         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4424          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4425         Public ReadOnly Property Col14Column() As Global.System.Data.DataColumn
4426             Get
4427                 Return Me.columnCol14
4428             End Get
4429         End Property
4430         
4431         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4432          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4433         Public ReadOnly Property Col15Column() As Global.System.Data.DataColumn
4434             Get
4435                 Return Me.columnCol15
4436             End Get
4437         End Property
4438         
4439         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4440          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
4441          Global.System.ComponentModel.Browsable(false)> _
4442         Public ReadOnly Property Count() As Integer
4443             Get
4444                 Return Me.Rows.Count
4445             End Get
4446         End Property
4447         
4448         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4449          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4450         Public Default ReadOnly Property Item(ByVal index As Integer) As POSGroupingRow
4451             Get
4452                 Return CType(Me.Rows(index),POSGroupingRow)
4453             End Get
4454         End Property
4455         
4456         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4457         Public Event POSGroupingRowChanging As POSGroupingRowChangeEventHandler
4458         
4459         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4460         Public Event POSGroupingRowChanged As POSGroupingRowChangeEventHandler
4461         
4462         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4463         Public Event POSGroupingRowDeleting As POSGroupingRowChangeEventHandler
4464         
4465         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4466         Public Event POSGroupingRowDeleted As POSGroupingRowChangeEventHandler
4467         
4468         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4469          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4470         Public Overloads Sub AddPOSGroupingRow(ByVal row As POSGroupingRow)
4471             Me.Rows.Add(row)
4472         End Sub
4473         
4474         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4475          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4476         Public Overloads Function AddPOSGroupingRow(ByVal Col1 As Integer, ByVal Col2 As String, ByVal Col3 As Decimal, ByVal Col4 As Decimal, ByVal Col5 As Decimal, ByVal Col6 As Decimal, ByVal Col7 As Decimal, ByVal Col8 As Decimal, ByVal Col9 As Decimal, ByVal Col10 As Decimal, ByVal Col11 As Decimal, ByVal Col12 As Decimal, ByVal Col13 As Decimal, ByVal Col14 As Decimal, ByVal Col15 As String) As POSGroupingRow
4477             Dim rowPOSGroupingRow As POSGroupingRow = CType(Me.NewRow,POSGroupingRow)
4478             Dim columnValuesArray() As Object = New Object() {Nothing, Col1, Col2, Col3, Col4, Col5, Col6, Col7, Col8, Col9, Col10, Col11, Col12, Col13, Col14, Col15}
4479             rowPOSGroupingRow.ItemArray = columnValuesArray
4480             Me.Rows.Add(rowPOSGroupingRow)
4481             Return rowPOSGroupingRow
4482         End Function
4483         
4484         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4485          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4486         Public Function FindById(ByVal Id As Integer) As POSGroupingRow
4487             Return CType(Me.Rows.Find(New Object() {Id}),POSGroupingRow)
4488         End Function
4489         
4490         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4491          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4492         Public Overrides Function Clone() As Global.System.Data.DataTable
4493             Dim cln As POSGroupingDataTable = CType(MyBase.Clone,POSGroupingDataTable)
4494             cln.InitVars
4495             Return cln
4496         End Function
4497         
4498         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4499          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4500         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
4501             Return New POSGroupingDataTable()
4502         End Function
4503         
4504         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4505          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4506         Friend Sub InitVars()
4507             Me.columnId = MyBase.Columns("Id")
4508             Me.columnCol1 = MyBase.Columns("Col1")
4509             Me.columnCol2 = MyBase.Columns("Col2")
4510             Me.columnCol3 = MyBase.Columns("Col3")
4511             Me.columnCol4 = MyBase.Columns("Col4")
4512             Me.columnCol5 = MyBase.Columns("Col5")
4513             Me.columnCol6 = MyBase.Columns("Col6")
4514             Me.columnCol7 = MyBase.Columns("Col7")
4515             Me.columnCol8 = MyBase.Columns("Col8")
4516             Me.columnCol9 = MyBase.Columns("Col9")
4517             Me.columnCol10 = MyBase.Columns("Col10")
4518             Me.columnCol11 = MyBase.Columns("Col11")
4519             Me.columnCol12 = MyBase.Columns("Col12")
4520             Me.columnCol13 = MyBase.Columns("Col13")
4521             Me.columnCol14 = MyBase.Columns("Col14")
4522             Me.columnCol15 = MyBase.Columns("Col15")
4523         End Sub
4524         
4525         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4526          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4527         Private Sub InitClass()
4528             Me.columnId = New Global.System.Data.DataColumn("Id", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
4529             MyBase.Columns.Add(Me.columnId)
4530             Me.columnCol1 = New Global.System.Data.DataColumn("Col1", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
4531             MyBase.Columns.Add(Me.columnCol1)
4532             Me.columnCol2 = New Global.System.Data.DataColumn("Col2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
4533             MyBase.Columns.Add(Me.columnCol2)
4534             Me.columnCol3 = New Global.System.Data.DataColumn("Col3", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4535             MyBase.Columns.Add(Me.columnCol3)
4536             Me.columnCol4 = New Global.System.Data.DataColumn("Col4", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4537             MyBase.Columns.Add(Me.columnCol4)
4538             Me.columnCol5 = New Global.System.Data.DataColumn("Col5", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4539             MyBase.Columns.Add(Me.columnCol5)
4540             Me.columnCol6 = New Global.System.Data.DataColumn("Col6", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4541             MyBase.Columns.Add(Me.columnCol6)
4542             Me.columnCol7 = New Global.System.Data.DataColumn("Col7", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4543             MyBase.Columns.Add(Me.columnCol7)
4544             Me.columnCol8 = New Global.System.Data.DataColumn("Col8", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4545             MyBase.Columns.Add(Me.columnCol8)
4546             Me.columnCol9 = New Global.System.Data.DataColumn("Col9", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4547             MyBase.Columns.Add(Me.columnCol9)
4548             Me.columnCol10 = New Global.System.Data.DataColumn("Col10", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4549             MyBase.Columns.Add(Me.columnCol10)
4550             Me.columnCol11 = New Global.System.Data.DataColumn("Col11", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4551             MyBase.Columns.Add(Me.columnCol11)
4552             Me.columnCol12 = New Global.System.Data.DataColumn("Col12", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4553             MyBase.Columns.Add(Me.columnCol12)
4554             Me.columnCol13 = New Global.System.Data.DataColumn("Col13", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4555             MyBase.Columns.Add(Me.columnCol13)
4556             Me.columnCol14 = New Global.System.Data.DataColumn("Col14", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
4557             MyBase.Columns.Add(Me.columnCol14)
4558             Me.columnCol15 = New Global.System.Data.DataColumn("Col15", GetType(String), Nothing, Global.System.Data.MappingType.Element)
4559             MyBase.Columns.Add(Me.columnCol15)
4560             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnId}, true))
4561             Me.columnId.AutoIncrement = true
4562             Me.columnId.AutoIncrementSeed = -1
4563             Me.columnId.AutoIncrementStep = -1
4564             Me.columnId.AllowDBNull = false
4565             Me.columnId.Unique = true
4566             Me.columnCol2.MaxLength = 255
4567             Me.columnCol15.MaxLength = 255
4568         End Sub
4569         
4570         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4571          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4572         Public Function NewPOSGroupingRow() As POSGroupingRow
4573             Return CType(Me.NewRow,POSGroupingRow)
4574         End Function
4575         
4576         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4577          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4578         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
4579             Return New POSGroupingRow(builder)
4580         End Function
4581         
4582         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4583          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4584         Protected Overrides Function GetRowType() As Global.System.Type
4585             Return GetType(POSGroupingRow)
4586         End Function
4587         
4588         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4589          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4590         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4591             MyBase.OnRowChanged(e)
4592             If (Not (Me.POSGroupingRowChangedEvent) Is Nothing) Then
4593                 RaiseEvent POSGroupingRowChanged(Me, New POSGroupingRowChangeEvent(CType(e.Row,POSGroupingRow), e.Action))
4594             End If
4595         End Sub
4596         
4597         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4598          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4599         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4600             MyBase.OnRowChanging(e)
4601             If (Not (Me.POSGroupingRowChangingEvent) Is Nothing) Then
4602                 RaiseEvent POSGroupingRowChanging(Me, New POSGroupingRowChangeEvent(CType(e.Row,POSGroupingRow), e.Action))
4603             End If
4604         End Sub
4605         
4606         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4607          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4608         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4609             MyBase.OnRowDeleted(e)
4610             If (Not (Me.POSGroupingRowDeletedEvent) Is Nothing) Then
4611                 RaiseEvent POSGroupingRowDeleted(Me, New POSGroupingRowChangeEvent(CType(e.Row,POSGroupingRow), e.Action))
4612             End If
4613         End Sub
4614         
4615         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4616          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4617         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4618             MyBase.OnRowDeleting(e)
4619             If (Not (Me.POSGroupingRowDeletingEvent) Is Nothing) Then
4620                 RaiseEvent POSGroupingRowDeleting(Me, New POSGroupingRowChangeEvent(CType(e.Row,POSGroupingRow), e.Action))
4621             End If
4622         End Sub
4623         
4624         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4625          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4626         Public Sub RemovePOSGroupingRow(ByVal row As POSGroupingRow)
4627             Me.Rows.Remove(row)
4628         End Sub
4629         
4630         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4631          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4632         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
4633             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
4634             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
4635             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
4636             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
4637             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
4638             any1.MinOccurs = New Decimal(0)
4639             any1.MaxOccurs = Decimal.MaxValue
4640             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
4641             sequence.Items.Add(any1)
4642             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
4643             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
4644             any2.MinOccurs = New Decimal(1)
4645             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
4646             sequence.Items.Add(any2)
4647             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
4648             attribute1.Name = "namespace"
4649             attribute1.FixedValue = ds.Namespace
4650             type.Attributes.Add(attribute1)
4651             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
4652             attribute2.Name = "tableTypeName"
4653             attribute2.FixedValue = "POSGroupingDataTable"
4654             type.Attributes.Add(attribute2)
4655             type.Particle = sequence
4656             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
4657             If xs.Contains(dsSchema.TargetNamespace) Then
4658                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
4659                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
4660                 Try
4661                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
4662                     dsSchema.Write(s1)
4663                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
4664                     Do While schemas.MoveNext
4665                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
4666                         s2.SetLength(0)
4667                         schema.Write(s2)
4668                         If (s1.Length = s2.Length) Then
4669                             s1.Position = 0
4670                             s2.Position = 0
4671                             
4672                             Do While ((s1.Position <> s1.Length) _
4673                                         AndAlso (s1.ReadByte = s2.ReadByte))
4674                                 
4675                                 
4676                             Loop
4677                             If (s1.Position = s1.Length) Then
4678                                 Return type
4679                             End If
4680                         End If
4681                         
4682                     Loop
4683                 Finally
4684                     If (Not (s1) Is Nothing) Then
4685                         s1.Close
4686                     End If
4687                     If (Not (s2) Is Nothing) Then
4688                         s2.Close
4689                     End If
4690                 End Try
4691             End If
4692             xs.Add(dsSchema)
4693             Return type
4694         End Function
4695     End Class
4696     
4697     '''<summary>
4698     '''Represents the strongly named DataTable class.
4699     '''</summary>
4700     <Global.System.Serializable(), _
4701      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
4702     Partial Public Class POSPrinterSettingDataTable
4703         Inherits Global.System.Data.TypedTableBase(Of POSPrinterSettingRow)
4704         
4705         Private columnId As Global.System.Data.DataColumn
4706         
4707         Private columnPrinterName As Global.System.Data.DataColumn
4708         
4709         Private columnPrinterType As Global.System.Data.DataColumn
4710         
4711         Private columnIsEnabled As Global.System.Data.DataColumn
4712         
4713         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4714          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4715         Public Sub New()
4716             MyBase.New
4717             Me.TableName = "POSPrinterSetting"
4718             Me.BeginInit
4719             Me.InitClass
4720             Me.EndInit
4721         End Sub
4722         
4723         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4724          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4725         Friend Sub New(ByVal table As Global.System.Data.DataTable)
4726             MyBase.New
4727             Me.TableName = table.TableName
4728             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
4729                 Me.CaseSensitive = table.CaseSensitive
4730             End If
4731             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
4732                 Me.Locale = table.Locale
4733             End If
4734             If (table.Namespace <> table.DataSet.Namespace) Then
4735                 Me.Namespace = table.Namespace
4736             End If
4737             Me.Prefix = table.Prefix
4738             Me.MinimumCapacity = table.MinimumCapacity
4739         End Sub
4740         
4741         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4742          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4743         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
4744             MyBase.New(info, context)
4745             Me.InitVars
4746         End Sub
4747         
4748         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4749          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4750         Public ReadOnly Property IdColumn() As Global.System.Data.DataColumn
4751             Get
4752                 Return Me.columnId
4753             End Get
4754         End Property
4755         
4756         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4757          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4758         Public ReadOnly Property PrinterNameColumn() As Global.System.Data.DataColumn
4759             Get
4760                 Return Me.columnPrinterName
4761             End Get
4762         End Property
4763         
4764         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4765          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4766         Public ReadOnly Property PrinterTypeColumn() As Global.System.Data.DataColumn
4767             Get
4768                 Return Me.columnPrinterType
4769             End Get
4770         End Property
4771         
4772         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4773          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4774         Public ReadOnly Property IsEnabledColumn() As Global.System.Data.DataColumn
4775             Get
4776                 Return Me.columnIsEnabled
4777             End Get
4778         End Property
4779         
4780         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4781          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
4782          Global.System.ComponentModel.Browsable(false)> _
4783         Public ReadOnly Property Count() As Integer
4784             Get
4785                 Return Me.Rows.Count
4786             End Get
4787         End Property
4788         
4789         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4790          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4791         Public Default ReadOnly Property Item(ByVal index As Integer) As POSPrinterSettingRow
4792             Get
4793                 Return CType(Me.Rows(index),POSPrinterSettingRow)
4794             End Get
4795         End Property
4796         
4797         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4798         Public Event POSPrinterSettingRowChanging As POSPrinterSettingRowChangeEventHandler
4799         
4800         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4801         Public Event POSPrinterSettingRowChanged As POSPrinterSettingRowChangeEventHandler
4802         
4803         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4804         Public Event POSPrinterSettingRowDeleting As POSPrinterSettingRowChangeEventHandler
4805         
4806         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4807         Public Event POSPrinterSettingRowDeleted As POSPrinterSettingRowChangeEventHandler
4808         
4809         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4810          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4811         Public Overloads Sub AddPOSPrinterSettingRow(ByVal row As POSPrinterSettingRow)
4812             Me.Rows.Add(row)
4813         End Sub
4814         
4815         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4816          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4817         Public Overloads Function AddPOSPrinterSettingRow(ByVal PrinterName As String, ByVal PrinterType As String, ByVal IsEnabled As String) As POSPrinterSettingRow
4818             Dim rowPOSPrinterSettingRow As POSPrinterSettingRow = CType(Me.NewRow,POSPrinterSettingRow)
4819             Dim columnValuesArray() As Object = New Object() {Nothing, PrinterName, PrinterType, IsEnabled}
4820             rowPOSPrinterSettingRow.ItemArray = columnValuesArray
4821             Me.Rows.Add(rowPOSPrinterSettingRow)
4822             Return rowPOSPrinterSettingRow
4823         End Function
4824         
4825         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4826          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4827         Public Function FindById(ByVal Id As Integer) As POSPrinterSettingRow
4828             Return CType(Me.Rows.Find(New Object() {Id}),POSPrinterSettingRow)
4829         End Function
4830         
4831         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4832          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4833         Public Overrides Function Clone() As Global.System.Data.DataTable
4834             Dim cln As POSPrinterSettingDataTable = CType(MyBase.Clone,POSPrinterSettingDataTable)
4835             cln.InitVars
4836             Return cln
4837         End Function
4838         
4839         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4840          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4841         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
4842             Return New POSPrinterSettingDataTable()
4843         End Function
4844         
4845         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4846          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4847         Friend Sub InitVars()
4848             Me.columnId = MyBase.Columns("Id")
4849             Me.columnPrinterName = MyBase.Columns("PrinterName")
4850             Me.columnPrinterType = MyBase.Columns("PrinterType")
4851             Me.columnIsEnabled = MyBase.Columns("IsEnabled")
4852         End Sub
4853         
4854         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4855          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4856         Private Sub InitClass()
4857             Me.columnId = New Global.System.Data.DataColumn("Id", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
4858             MyBase.Columns.Add(Me.columnId)
4859             Me.columnPrinterName = New Global.System.Data.DataColumn("PrinterName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
4860             MyBase.Columns.Add(Me.columnPrinterName)
4861             Me.columnPrinterType = New Global.System.Data.DataColumn("PrinterType", GetType(String), Nothing, Global.System.Data.MappingType.Element)
4862             MyBase.Columns.Add(Me.columnPrinterType)
4863             Me.columnIsEnabled = New Global.System.Data.DataColumn("IsEnabled", GetType(String), Nothing, Global.System.Data.MappingType.Element)
4864             MyBase.Columns.Add(Me.columnIsEnabled)
4865             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnId}, true))
4866             Me.columnId.AutoIncrement = true
4867             Me.columnId.AutoIncrementSeed = -1
4868             Me.columnId.AutoIncrementStep = -1
4869             Me.columnId.AllowDBNull = false
4870             Me.columnId.Unique = true
4871             Me.columnPrinterName.MaxLength = 255
4872             Me.columnPrinterType.MaxLength = 255
4873             Me.columnIsEnabled.MaxLength = 255
4874         End Sub
4875         
4876         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4877          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4878         Public Function NewPOSPrinterSettingRow() As POSPrinterSettingRow
4879             Return CType(Me.NewRow,POSPrinterSettingRow)
4880         End Function
4881         
4882         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4883          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4884         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
4885             Return New POSPrinterSettingRow(builder)
4886         End Function
4887         
4888         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4889          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4890         Protected Overrides Function GetRowType() As Global.System.Type
4891             Return GetType(POSPrinterSettingRow)
4892         End Function
4893         
4894         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4895          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4896         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4897             MyBase.OnRowChanged(e)
4898             If (Not (Me.POSPrinterSettingRowChangedEvent) Is Nothing) Then
4899                 RaiseEvent POSPrinterSettingRowChanged(Me, New POSPrinterSettingRowChangeEvent(CType(e.Row,POSPrinterSettingRow), e.Action))
4900             End If
4901         End Sub
4902         
4903         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4904          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4905         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4906             MyBase.OnRowChanging(e)
4907             If (Not (Me.POSPrinterSettingRowChangingEvent) Is Nothing) Then
4908                 RaiseEvent POSPrinterSettingRowChanging(Me, New POSPrinterSettingRowChangeEvent(CType(e.Row,POSPrinterSettingRow), e.Action))
4909             End If
4910         End Sub
4911         
4912         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4913          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4914         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4915             MyBase.OnRowDeleted(e)
4916             If (Not (Me.POSPrinterSettingRowDeletedEvent) Is Nothing) Then
4917                 RaiseEvent POSPrinterSettingRowDeleted(Me, New POSPrinterSettingRowChangeEvent(CType(e.Row,POSPrinterSettingRow), e.Action))
4918             End If
4919         End Sub
4920         
4921         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4922          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4923         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
4924             MyBase.OnRowDeleting(e)
4925             If (Not (Me.POSPrinterSettingRowDeletingEvent) Is Nothing) Then
4926                 RaiseEvent POSPrinterSettingRowDeleting(Me, New POSPrinterSettingRowChangeEvent(CType(e.Row,POSPrinterSettingRow), e.Action))
4927             End If
4928         End Sub
4929         
4930         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4931          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4932         Public Sub RemovePOSPrinterSettingRow(ByVal row As POSPrinterSettingRow)
4933             Me.Rows.Remove(row)
4934         End Sub
4935         
4936         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
4937          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
4938         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
4939             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
4940             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
4941             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
4942             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
4943             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
4944             any1.MinOccurs = New Decimal(0)
4945             any1.MaxOccurs = Decimal.MaxValue
4946             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
4947             sequence.Items.Add(any1)
4948             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
4949             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
4950             any2.MinOccurs = New Decimal(1)
4951             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
4952             sequence.Items.Add(any2)
4953             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
4954             attribute1.Name = "namespace"
4955             attribute1.FixedValue = ds.Namespace
4956             type.Attributes.Add(attribute1)
4957             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
4958             attribute2.Name = "tableTypeName"
4959             attribute2.FixedValue = "POSPrinterSettingDataTable"
4960             type.Attributes.Add(attribute2)
4961             type.Particle = sequence
4962             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
4963             If xs.Contains(dsSchema.TargetNamespace) Then
4964                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
4965                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
4966                 Try
4967                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
4968                     dsSchema.Write(s1)
4969                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
4970                     Do While schemas.MoveNext
4971                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
4972                         s2.SetLength(0)
4973                         schema.Write(s2)
4974                         If (s1.Length = s2.Length) Then
4975                             s1.Position = 0
4976                             s2.Position = 0
4977                             
4978                             Do While ((s1.Position <> s1.Length) _
4979                                         AndAlso (s1.ReadByte = s2.ReadByte))
4980                                 
4981                                 
4982                             Loop
4983                             If (s1.Position = s1.Length) Then
4984                                 Return type
4985                             End If
4986                         End If
4987                         
4988                     Loop
4989                 Finally
4990                     If (Not (s1) Is Nothing) Then
4991                         s1.Close
4992                     End If
4993                     If (Not (s2) Is Nothing) Then
4994                         s2.Close
4995                     End If
4996                 End Try
4997             End If
4998             xs.Add(dsSchema)
4999             Return type
5000         End Function
5001     End Class
5002     
5003     '''<summary>
5004     '''Represents the strongly named DataTable class.
5005     '''</summary>
5006     <Global.System.Serializable(), _
5007      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
5008     Partial Public Class R_TableDataTable
5009         Inherits Global.System.Data.TypedTableBase(Of R_TableRow)
5010         
5011         Private columnTableNo As Global.System.Data.DataColumn
5012         
5013         Private columnStatus As Global.System.Data.DataColumn
5014         
5015         Private columnInventoryType As Global.System.Data.DataColumn
5016         
5017         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5018          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5019         Public Sub New()
5020             MyBase.New
5021             Me.TableName = "R_Table"
5022             Me.BeginInit
5023             Me.InitClass
5024             Me.EndInit
5025         End Sub
5026         
5027         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5028          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5029         Friend Sub New(ByVal table As Global.System.Data.DataTable)
5030             MyBase.New
5031             Me.TableName = table.TableName
5032             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
5033                 Me.CaseSensitive = table.CaseSensitive
5034             End If
5035             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
5036                 Me.Locale = table.Locale
5037             End If
5038             If (table.Namespace <> table.DataSet.Namespace) Then
5039                 Me.Namespace = table.Namespace
5040             End If
5041             Me.Prefix = table.Prefix
5042             Me.MinimumCapacity = table.MinimumCapacity
5043         End Sub
5044         
5045         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5046          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5047         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
5048             MyBase.New(info, context)
5049             Me.InitVars
5050         End Sub
5051         
5052         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5053          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5054         Public ReadOnly Property TableNoColumn() As Global.System.Data.DataColumn
5055             Get
5056                 Return Me.columnTableNo
5057             End Get
5058         End Property
5059         
5060         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5061          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5062         Public ReadOnly Property StatusColumn() As Global.System.Data.DataColumn
5063             Get
5064                 Return Me.columnStatus
5065             End Get
5066         End Property
5067         
5068         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5069          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5070         Public ReadOnly Property InventoryTypeColumn() As Global.System.Data.DataColumn
5071             Get
5072                 Return Me.columnInventoryType
5073             End Get
5074         End Property
5075         
5076         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5077          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
5078          Global.System.ComponentModel.Browsable(false)> _
5079         Public ReadOnly Property Count() As Integer
5080             Get
5081                 Return Me.Rows.Count
5082             End Get
5083         End Property
5084         
5085         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5086          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5087         Public Default ReadOnly Property Item(ByVal index As Integer) As R_TableRow
5088             Get
5089                 Return CType(Me.Rows(index),R_TableRow)
5090             End Get
5091         End Property
5092         
5093         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5094         Public Event R_TableRowChanging As R_TableRowChangeEventHandler
5095         
5096         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5097         Public Event R_TableRowChanged As R_TableRowChangeEventHandler
5098         
5099         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5100         Public Event R_TableRowDeleting As R_TableRowChangeEventHandler
5101         
5102         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5103         Public Event R_TableRowDeleted As R_TableRowChangeEventHandler
5104         
5105         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5106          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5107         Public Overloads Sub AddR_TableRow(ByVal row As R_TableRow)
5108             Me.Rows.Add(row)
5109         End Sub
5110         
5111         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5112          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5113         Public Overloads Function AddR_TableRow(ByVal TableNo As String, ByVal Status As String, ByVal parentInventoryTypeRowByInventoryTypeR_Table As InventoryTypeRow) As R_TableRow
5114             Dim rowR_TableRow As R_TableRow = CType(Me.NewRow,R_TableRow)
5115             Dim columnValuesArray() As Object = New Object() {TableNo, Status, Nothing}
5116             If (Not (parentInventoryTypeRowByInventoryTypeR_Table) Is Nothing) Then
5117                 columnValuesArray(2) = parentInventoryTypeRowByInventoryTypeR_Table(0)
5118             End If
5119             rowR_TableRow.ItemArray = columnValuesArray
5120             Me.Rows.Add(rowR_TableRow)
5121             Return rowR_TableRow
5122         End Function
5123         
5124         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5125          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5126         Public Function FindByTableNo(ByVal TableNo As String) As R_TableRow
5127             Return CType(Me.Rows.Find(New Object() {TableNo}),R_TableRow)
5128         End Function
5129         
5130         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5131          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5132         Public Overrides Function Clone() As Global.System.Data.DataTable
5133             Dim cln As R_TableDataTable = CType(MyBase.Clone,R_TableDataTable)
5134             cln.InitVars
5135             Return cln
5136         End Function
5137         
5138         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5139          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5140         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
5141             Return New R_TableDataTable()
5142         End Function
5143         
5144         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5145          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5146         Friend Sub InitVars()
5147             Me.columnTableNo = MyBase.Columns("TableNo")
5148             Me.columnStatus = MyBase.Columns("Status")
5149             Me.columnInventoryType = MyBase.Columns("InventoryType")
5150         End Sub
5151         
5152         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5153          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5154         Private Sub InitClass()
5155             Me.columnTableNo = New Global.System.Data.DataColumn("TableNo", GetType(String), Nothing, Global.System.Data.MappingType.Element)
5156             MyBase.Columns.Add(Me.columnTableNo)
5157             Me.columnStatus = New Global.System.Data.DataColumn("Status", GetType(String), Nothing, Global.System.Data.MappingType.Element)
5158             MyBase.Columns.Add(Me.columnStatus)
5159             Me.columnInventoryType = New Global.System.Data.DataColumn("InventoryType", GetType(String), Nothing, Global.System.Data.MappingType.Element)
5160             MyBase.Columns.Add(Me.columnInventoryType)
5161             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnTableNo}, true))
5162             Me.columnTableNo.AllowDBNull = false
5163             Me.columnTableNo.Unique = true
5164             Me.columnTableNo.MaxLength = 255
5165             Me.columnStatus.MaxLength = 255
5166             Me.columnInventoryType.MaxLength = 255
5167         End Sub
5168         
5169         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5170          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5171         Public Function NewR_TableRow() As R_TableRow
5172             Return CType(Me.NewRow,R_TableRow)
5173         End Function
5174         
5175         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5176          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5177         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
5178             Return New R_TableRow(builder)
5179         End Function
5180         
5181         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5182          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5183         Protected Overrides Function GetRowType() As Global.System.Type
5184             Return GetType(R_TableRow)
5185         End Function
5186         
5187         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5188          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5189         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
5190             MyBase.OnRowChanged(e)
5191             If (Not (Me.R_TableRowChangedEvent) Is Nothing) Then
5192                 RaiseEvent R_TableRowChanged(Me, New R_TableRowChangeEvent(CType(e.Row,R_TableRow), e.Action))
5193             End If
5194         End Sub
5195         
5196         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5197          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5198         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
5199             MyBase.OnRowChanging(e)
5200             If (Not (Me.R_TableRowChangingEvent) Is Nothing) Then
5201                 RaiseEvent R_TableRowChanging(Me, New R_TableRowChangeEvent(CType(e.Row,R_TableRow), e.Action))
5202             End If
5203         End Sub
5204         
5205         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5206          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5207         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
5208             MyBase.OnRowDeleted(e)
5209             If (Not (Me.R_TableRowDeletedEvent) Is Nothing) Then
5210                 RaiseEvent R_TableRowDeleted(Me, New R_TableRowChangeEvent(CType(e.Row,R_TableRow), e.Action))
5211             End If
5212         End Sub
5213         
5214         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5215          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5216         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
5217             MyBase.OnRowDeleting(e)
5218             If (Not (Me.R_TableRowDeletingEvent) Is Nothing) Then
5219                 RaiseEvent R_TableRowDeleting(Me, New R_TableRowChangeEvent(CType(e.Row,R_TableRow), e.Action))
5220             End If
5221         End Sub
5222         
5223         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5224          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5225         Public Sub RemoveR_TableRow(ByVal row As R_TableRow)
5226             Me.Rows.Remove(row)
5227         End Sub
5228         
5229         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5230          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5231         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
5232             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
5233             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
5234             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
5235             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
5236             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
5237             any1.MinOccurs = New Decimal(0)
5238             any1.MaxOccurs = Decimal.MaxValue
5239             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
5240             sequence.Items.Add(any1)
5241             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
5242             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
5243             any2.MinOccurs = New Decimal(1)
5244             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
5245             sequence.Items.Add(any2)
5246             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
5247             attribute1.Name = "namespace"
5248             attribute1.FixedValue = ds.Namespace
5249             type.Attributes.Add(attribute1)
5250             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
5251             attribute2.Name = "tableTypeName"
5252             attribute2.FixedValue = "R_TableDataTable"
5253             type.Attributes.Add(attribute2)
5254             type.Particle = sequence
5255             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
5256             If xs.Contains(dsSchema.TargetNamespace) Then
5257                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
5258                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
5259                 Try
5260                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
5261                     dsSchema.Write(s1)
5262                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
5263                     Do While schemas.MoveNext
5264                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
5265                         s2.SetLength(0)
5266                         schema.Write(s2)
5267                         If (s1.Length = s2.Length) Then
5268                             s1.Position = 0
5269                             s2.Position = 0
5270                             
5271                             Do While ((s1.Position <> s1.Length) _
5272                                         AndAlso (s1.ReadByte = s2.ReadByte))
5273                                 
5274                                 
5275                             Loop
5276                             If (s1.Position = s1.Length) Then
5277                                 Return type
5278                             End If
5279                         End If
5280                         
5281                     Loop
5282                 Finally
5283                     If (Not (s1) Is Nothing) Then
5284                         s1.Close
5285                     End If
5286                     If (Not (s2) Is Nothing) Then
5287                         s2.Close
5288                     End If
5289                 End Try
5290             End If
5291             xs.Add(dsSchema)
5292             Return type
5293         End Function
5294     End Class
5295     
5296     '''<summary>
5297     '''Represents the strongly named DataTable class.
5298     '''</summary>
5299     <Global.System.Serializable(), _
5300      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
5301     Partial Public Class RegistrationDataTable
5302         Inherits Global.System.Data.TypedTableBase(Of RegistrationRow)
5303         
5304         Private columnUserID As Global.System.Data.DataColumn
5305         
5306         Private columnUserType As Global.System.Data.DataColumn
5307         
5308         Private columnPassword As Global.System.Data.DataColumn
5309         
5310         Private columnRegisteredName As Global.System.Data.DataColumn
5311         
5312         Private columnContactNo As Global.System.Data.DataColumn
5313         
5314         Private columnEmailID As Global.System.Data.DataColumn
5315         
5316         Private columnJoiningDate As Global.System.Data.DataColumn
5317         
5318         Private columnActive As Global.System.Data.DataColumn
5319         
5320         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5321          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5322         Public Sub New()
5323             MyBase.New
5324             Me.TableName = "Registration"
5325             Me.BeginInit
5326             Me.InitClass
5327             Me.EndInit
5328         End Sub
5329         
5330         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5331          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5332         Friend Sub New(ByVal table As Global.System.Data.DataTable)
5333             MyBase.New
5334             Me.TableName = table.TableName
5335             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
5336                 Me.CaseSensitive = table.CaseSensitive
5337             End If
5338             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
5339                 Me.Locale = table.Locale
5340             End If
5341             If (table.Namespace <> table.DataSet.Namespace) Then
5342                 Me.Namespace = table.Namespace
5343             End If
5344             Me.Prefix = table.Prefix
5345             Me.MinimumCapacity = table.MinimumCapacity
5346         End Sub
5347         
5348         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5349          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5350         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
5351             MyBase.New(info, context)
5352             Me.InitVars
5353         End Sub
5354         
5355         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5356          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5357         Public ReadOnly Property UserIDColumn() As Global.System.Data.DataColumn
5358             Get
5359                 Return Me.columnUserID
5360             End Get
5361         End Property
5362         
5363         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5364          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5365         Public ReadOnly Property UserTypeColumn() As Global.System.Data.DataColumn
5366             Get
5367                 Return Me.columnUserType
5368             End Get
5369         End Property
5370         
5371         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5372          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5373         Public ReadOnly Property PasswordColumn() As Global.System.Data.DataColumn
5374             Get
5375                 Return Me.columnPassword
5376             End Get
5377         End Property
5378         
5379         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5380          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5381         Public ReadOnly Property RegisteredNameColumn() As Global.System.Data.DataColumn
5382             Get
5383                 Return Me.columnRegisteredName
5384             End Get
5385         End Property
5386         
5387         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5388          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5389         Public ReadOnly Property ContactNoColumn() As Global.System.Data.DataColumn
5390             Get
5391                 Return Me.columnContactNo
5392             End Get
5393         End Property
5394         
5395         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5396          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5397         Public ReadOnly Property EmailIDColumn() As Global.System.Data.DataColumn
5398             Get
5399                 Return Me.columnEmailID
5400             End Get
5401         End Property
5402         
5403         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5404          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5405         Public ReadOnly Property JoiningDateColumn() As Global.System.Data.DataColumn
5406             Get
5407                 Return Me.columnJoiningDate
5408             End Get
5409         End Property
5410         
5411         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5412          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5413         Public ReadOnly Property ActiveColumn() As Global.System.Data.DataColumn
5414             Get
5415                 Return Me.columnActive
5416             End Get
5417         End Property
5418         
5419         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5420          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
5421          Global.System.ComponentModel.Browsable(false)> _
5422         Public ReadOnly Property Count() As Integer
5423             Get
5424                 Return Me.Rows.Count
5425             End Get
5426         End Property
5427         
5428         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5429          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5430         Public Default ReadOnly Property Item(ByVal index As Integer) As RegistrationRow
5431             Get
5432                 Return CType(Me.Rows(index),RegistrationRow)
5433             End Get
5434         End Property
5435         
5436         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5437         Public Event RegistrationRowChanging As RegistrationRowChangeEventHandler
5438         
5439         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5440         Public Event RegistrationRowChanged As RegistrationRowChangeEventHandler
5441         
5442         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5443         Public Event RegistrationRowDeleting As RegistrationRowChangeEventHandler
5444         
5445         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5446         Public Event RegistrationRowDeleted As RegistrationRowChangeEventHandler
5447         
5448         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5449          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5450         Public Overloads Sub AddRegistrationRow(ByVal row As RegistrationRow)
5451             Me.Rows.Add(row)
5452         End Sub
5453         
5454         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5455          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5456         Public Overloads Function AddRegistrationRow(ByVal UserID As String, ByVal UserType As String, ByVal Password As String, ByVal RegisteredName As String, ByVal ContactNo As String, ByVal EmailID As String, ByVal JoiningDate As Date, ByVal Active As String) As RegistrationRow
5457             Dim rowRegistrationRow As RegistrationRow = CType(Me.NewRow,RegistrationRow)
5458             Dim columnValuesArray() As Object = New Object() {UserID, UserType, Password, RegisteredName, ContactNo, EmailID, JoiningDate, Active}
5459             rowRegistrationRow.ItemArray = columnValuesArray
5460             Me.Rows.Add(rowRegistrationRow)
5461             Return rowRegistrationRow
5462         End Function
5463         
5464         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5465          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5466         Public Function FindByUserID(ByVal UserID As String) As RegistrationRow
5467             Return CType(Me.Rows.Find(New Object() {UserID}),RegistrationRow)
5468         End Function
5469         
5470         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5471          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5472         Public Overrides Function Clone() As Global.System.Data.DataTable
5473             Dim cln As RegistrationDataTable = CType(MyBase.Clone,RegistrationDataTable)
5474             cln.InitVars
5475             Return cln
5476         End Function
5477         
5478         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5479          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5480         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
5481             Return New RegistrationDataTable()
5482         End Function
5483         
5484         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5485          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5486         Friend Sub InitVars()
5487             Me.columnUserID = MyBase.Columns("UserID")
5488             Me.columnUserType = MyBase.Columns("UserType")
5489             Me.columnPassword = MyBase.Columns("Password")
5490             Me.columnRegisteredName = MyBase.Columns("RegisteredName")
5491             Me.columnContactNo = MyBase.Columns("ContactNo")
5492             Me.columnEmailID = MyBase.Columns("EmailID")
5493             Me.columnJoiningDate = MyBase.Columns("JoiningDate")
5494             Me.columnActive = MyBase.Columns("Active")
5495         End Sub
5496         
5497         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5498          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5499         Private Sub InitClass()
5500             Me.columnUserID = New Global.System.Data.DataColumn("UserID", GetType(String), Nothing, Global.System.Data.MappingType.Element)
5501             MyBase.Columns.Add(Me.columnUserID)
5502             Me.columnUserType = New Global.System.Data.DataColumn("UserType", GetType(String), Nothing, Global.System.Data.MappingType.Element)
5503             MyBase.Columns.Add(Me.columnUserType)
5504             Me.columnPassword = New Global.System.Data.DataColumn("Password", GetType(String), Nothing, Global.System.Data.MappingType.Element)
5505             MyBase.Columns.Add(Me.columnPassword)
5506             Me.columnRegisteredName = New Global.System.Data.DataColumn("RegisteredName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
5507             MyBase.Columns.Add(Me.columnRegisteredName)
5508             Me.columnContactNo = New Global.System.Data.DataColumn("ContactNo", GetType(String), Nothing, Global.System.Data.MappingType.Element)
5509             MyBase.Columns.Add(Me.columnContactNo)
5510             Me.columnEmailID = New Global.System.Data.DataColumn("EmailID", GetType(String), Nothing, Global.System.Data.MappingType.Element)
5511             MyBase.Columns.Add(Me.columnEmailID)
5512             Me.columnJoiningDate = New Global.System.Data.DataColumn("JoiningDate", GetType(Date), Nothing, Global.System.Data.MappingType.Element)
5513             MyBase.Columns.Add(Me.columnJoiningDate)
5514             Me.columnActive = New Global.System.Data.DataColumn("Active", GetType(String), Nothing, Global.System.Data.MappingType.Element)
5515             MyBase.Columns.Add(Me.columnActive)
5516             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnUserID}, true))
5517             Me.columnUserID.AllowDBNull = false
5518             Me.columnUserID.Unique = true
5519             Me.columnUserID.MaxLength = 255
5520             Me.columnUserType.MaxLength = 255
5521             Me.columnPassword.MaxLength = 255
5522             Me.columnRegisteredName.MaxLength = 255
5523             Me.columnContactNo.MaxLength = 255
5524             Me.columnEmailID.MaxLength = 255
5525             Me.columnActive.MaxLength = 255
5526         End Sub
5527         
5528         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5529          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5530         Public Function NewRegistrationRow() As RegistrationRow
5531             Return CType(Me.NewRow,RegistrationRow)
5532         End Function
5533         
5534         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5535          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5536         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
5537             Return New RegistrationRow(builder)
5538         End Function
5539         
5540         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5541          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5542         Protected Overrides Function GetRowType() As Global.System.Type
5543             Return GetType(RegistrationRow)
5544         End Function
5545         
5546         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5547          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5548         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
5549             MyBase.OnRowChanged(e)
5550             If (Not (Me.RegistrationRowChangedEvent) Is Nothing) Then
5551                 RaiseEvent RegistrationRowChanged(Me, New RegistrationRowChangeEvent(CType(e.Row,RegistrationRow), e.Action))
5552             End If
5553         End Sub
5554         
5555         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5556          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5557         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
5558             MyBase.OnRowChanging(e)
5559             If (Not (Me.RegistrationRowChangingEvent) Is Nothing) Then
5560                 RaiseEvent RegistrationRowChanging(Me, New RegistrationRowChangeEvent(CType(e.Row,RegistrationRow), e.Action))
5561             End If
5562         End Sub
5563         
5564         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5565          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5566         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
5567             MyBase.OnRowDeleted(e)
5568             If (Not (Me.RegistrationRowDeletedEvent) Is Nothing) Then
5569                 RaiseEvent RegistrationRowDeleted(Me, New RegistrationRowChangeEvent(CType(e.Row,RegistrationRow), e.Action))
5570             End If
5571         End Sub
5572         
5573         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5574          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5575         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
5576             MyBase.OnRowDeleting(e)
5577             If (Not (Me.RegistrationRowDeletingEvent) Is Nothing) Then
5578                 RaiseEvent RegistrationRowDeleting(Me, New RegistrationRowChangeEvent(CType(e.Row,RegistrationRow), e.Action))
5579             End If
5580         End Sub
5581         
5582         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5583          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5584         Public Sub RemoveRegistrationRow(ByVal row As RegistrationRow)
5585             Me.Rows.Remove(row)
5586         End Sub
5587         
5588         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5589          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5590         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
5591             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
5592             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
5593             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
5594             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
5595             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
5596             any1.MinOccurs = New Decimal(0)
5597             any1.MaxOccurs = Decimal.MaxValue
5598             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
5599             sequence.Items.Add(any1)
5600             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
5601             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
5602             any2.MinOccurs = New Decimal(1)
5603             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
5604             sequence.Items.Add(any2)
5605             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
5606             attribute1.Name = "namespace"
5607             attribute1.FixedValue = ds.Namespace
5608             type.Attributes.Add(attribute1)
5609             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
5610             attribute2.Name = "tableTypeName"
5611             attribute2.FixedValue = "RegistrationDataTable"
5612             type.Attributes.Add(attribute2)
5613             type.Particle = sequence
5614             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
5615             If xs.Contains(dsSchema.TargetNamespace) Then
5616                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
5617                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
5618                 Try
5619                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
5620                     dsSchema.Write(s1)
5621                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
5622                     Do While schemas.MoveNext
5623                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
5624                         s2.SetLength(0)
5625                         schema.Write(s2)
5626                         If (s1.Length = s2.Length) Then
5627                             s1.Position = 0
5628                             s2.Position = 0
5629                             
5630                             Do While ((s1.Position <> s1.Length) _
5631                                         AndAlso (s1.ReadByte = s2.ReadByte))
5632                                 
5633                                 
5634                             Loop
5635                             If (s1.Position = s1.Length) Then
5636                                 Return type
5637                             End If
5638                         End If
5639                         
5640                     Loop
5641                 Finally
5642                     If (Not (s1) Is Nothing) Then
5643                         s1.Close
5644                     End If
5645                     If (Not (s2) Is Nothing) Then
5646                         s2.Close
5647                     End If
5648                 End Try
5649             End If
5650             xs.Add(dsSchema)
5651             Return type
5652         End Function
5653     End Class
5654     
5655     '''<summary>
5656     '''Represents the strongly named DataTable class.
5657     '''</summary>
5658     <Global.System.Serializable(), _
5659      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
5660     Partial Public Class RestaurantBillingInfoDataTable
5661         Inherits Global.System.Data.TypedTableBase(Of RestaurantBillingInfoRow)
5662         
5663         Private columnBillId As Global.System.Data.DataColumn
5664         
5665         Private columnBillType As Global.System.Data.DataColumn
5666         
5667         Private columnBillDate As Global.System.Data.DataColumn
5668         
5669         Private columnCustomerName As Global.System.Data.DataColumn
5670         
5671         Private columnAddressLine1 As Global.System.Data.DataColumn
5672         
5673         Private columnAddressLine2 As Global.System.Data.DataColumn
5674         
5675         Private columnAddressLine3 As Global.System.Data.DataColumn
5676         
5677         Private columnContactNo As Global.System.Data.DataColumn
5678         
5679         Private columnPaymentMode As Global.System.Data.DataColumn
5680         
5681         Private columnSubTotal As Global.System.Data.DataColumn
5682         
5683         Private columnItemDiscount As Global.System.Data.DataColumn
5684         
5685         Private columnDiscountPer As Global.System.Data.DataColumn
5686         
5687         Private columnDiscount As Global.System.Data.DataColumn
5688         
5689         Private columnVAT As Global.System.Data.DataColumn
5690         
5691         Private columnServiceTax As Global.System.Data.DataColumn
5692         
5693         Private columnServiceCharges As Global.System.Data.DataColumn
5694         
5695         Private columnTACharges As Global.System.Data.DataColumn
5696         
5697         Private columnHDCharges As Global.System.Data.DataColumn
5698         
5699         Private columnGrandTotal As Global.System.Data.DataColumn
5700         
5701         Private columnCash As Global.System.Data.DataColumn
5702         
5703         Private columnChange As Global.System.Data.DataColumn
5704         
5705         Private columnOperatorID As Global.System.Data.DataColumn
5706         
5707         Private columnBillNote As Global.System.Data.DataColumn
5708         
5709         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5710          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5711         Public Sub New()
5712             MyBase.New
5713             Me.TableName = "RestaurantBillingInfo"
5714             Me.BeginInit
5715             Me.InitClass
5716             Me.EndInit
5717         End Sub
5718         
5719         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5720          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5721         Friend Sub New(ByVal table As Global.System.Data.DataTable)
5722             MyBase.New
5723             Me.TableName = table.TableName
5724             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
5725                 Me.CaseSensitive = table.CaseSensitive
5726             End If
5727             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
5728                 Me.Locale = table.Locale
5729             End If
5730             If (table.Namespace <> table.DataSet.Namespace) Then
5731                 Me.Namespace = table.Namespace
5732             End If
5733             Me.Prefix = table.Prefix
5734             Me.MinimumCapacity = table.MinimumCapacity
5735         End Sub
5736         
5737         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5738          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5739         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
5740             MyBase.New(info, context)
5741             Me.InitVars
5742         End Sub
5743         
5744         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5745          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5746         Public ReadOnly Property BillIdColumn() As Global.System.Data.DataColumn
5747             Get
5748                 Return Me.columnBillId
5749             End Get
5750         End Property
5751         
5752         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5753          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5754         Public ReadOnly Property BillTypeColumn() As Global.System.Data.DataColumn
5755             Get
5756                 Return Me.columnBillType
5757             End Get
5758         End Property
5759         
5760         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5761          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5762         Public ReadOnly Property BillDateColumn() As Global.System.Data.DataColumn
5763             Get
5764                 Return Me.columnBillDate
5765             End Get
5766         End Property
5767         
5768         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5769          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5770         Public ReadOnly Property CustomerNameColumn() As Global.System.Data.DataColumn
5771             Get
5772                 Return Me.columnCustomerName
5773             End Get
5774         End Property
5775         
5776         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5777          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5778         Public ReadOnly Property AddressLine1Column() As Global.System.Data.DataColumn
5779             Get
5780                 Return Me.columnAddressLine1
5781             End Get
5782         End Property
5783         
5784         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5785          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5786         Public ReadOnly Property AddressLine2Column() As Global.System.Data.DataColumn
5787             Get
5788                 Return Me.columnAddressLine2
5789             End Get
5790         End Property
5791         
5792         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5793          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5794         Public ReadOnly Property AddressLine3Column() As Global.System.Data.DataColumn
5795             Get
5796                 Return Me.columnAddressLine3
5797             End Get
5798         End Property
5799         
5800         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5801          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5802         Public ReadOnly Property ContactNoColumn() As Global.System.Data.DataColumn
5803             Get
5804                 Return Me.columnContactNo
5805             End Get
5806         End Property
5807         
5808         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5809          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5810         Public ReadOnly Property PaymentModeColumn() As Global.System.Data.DataColumn
5811             Get
5812                 Return Me.columnPaymentMode
5813             End Get
5814         End Property
5815         
5816         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5817          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5818         Public ReadOnly Property SubTotalColumn() As Global.System.Data.DataColumn
5819             Get
5820                 Return Me.columnSubTotal
5821             End Get
5822         End Property
5823         
5824         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5825          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5826         Public ReadOnly Property ItemDiscountColumn() As Global.System.Data.DataColumn
5827             Get
5828                 Return Me.columnItemDiscount
5829             End Get
5830         End Property
5831         
5832         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5833          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5834         Public ReadOnly Property DiscountPerColumn() As Global.System.Data.DataColumn
5835             Get
5836                 Return Me.columnDiscountPer
5837             End Get
5838         End Property
5839         
5840         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5841          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5842         Public ReadOnly Property DiscountColumn() As Global.System.Data.DataColumn
5843             Get
5844                 Return Me.columnDiscount
5845             End Get
5846         End Property
5847         
5848         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5849          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5850         Public ReadOnly Property VATColumn() As Global.System.Data.DataColumn
5851             Get
5852                 Return Me.columnVAT
5853             End Get
5854         End Property
5855         
5856         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5857          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5858         Public ReadOnly Property ServiceTaxColumn() As Global.System.Data.DataColumn
5859             Get
5860                 Return Me.columnServiceTax
5861             End Get
5862         End Property
5863         
5864         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5865          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5866         Public ReadOnly Property ServiceChargesColumn() As Global.System.Data.DataColumn
5867             Get
5868                 Return Me.columnServiceCharges
5869             End Get
5870         End Property
5871         
5872         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5873          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5874         Public ReadOnly Property TAChargesColumn() As Global.System.Data.DataColumn
5875             Get
5876                 Return Me.columnTACharges
5877             End Get
5878         End Property
5879         
5880         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5881          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5882         Public ReadOnly Property HDChargesColumn() As Global.System.Data.DataColumn
5883             Get
5884                 Return Me.columnHDCharges
5885             End Get
5886         End Property
5887         
5888         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5889          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5890         Public ReadOnly Property GrandTotalColumn() As Global.System.Data.DataColumn
5891             Get
5892                 Return Me.columnGrandTotal
5893             End Get
5894         End Property
5895         
5896         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5897          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5898         Public ReadOnly Property CashColumn() As Global.System.Data.DataColumn
5899             Get
5900                 Return Me.columnCash
5901             End Get
5902         End Property
5903         
5904         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5905          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5906         Public ReadOnly Property ChangeColumn() As Global.System.Data.DataColumn
5907             Get
5908                 Return Me.columnChange
5909             End Get
5910         End Property
5911         
5912         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5913          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5914         Public ReadOnly Property OperatorIDColumn() As Global.System.Data.DataColumn
5915             Get
5916                 Return Me.columnOperatorID
5917             End Get
5918         End Property
5919         
5920         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5921          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5922         Public ReadOnly Property BillNoteColumn() As Global.System.Data.DataColumn
5923             Get
5924                 Return Me.columnBillNote
5925             End Get
5926         End Property
5927         
5928         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5929          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
5930          Global.System.ComponentModel.Browsable(false)> _
5931         Public ReadOnly Property Count() As Integer
5932             Get
5933                 Return Me.Rows.Count
5934             End Get
5935         End Property
5936         
5937         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5938          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5939         Public Default ReadOnly Property Item(ByVal index As Integer) As RestaurantBillingInfoRow
5940             Get
5941                 Return CType(Me.Rows(index),RestaurantBillingInfoRow)
5942             End Get
5943         End Property
5944         
5945         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5946         Public Event RestaurantBillingInfoRowChanging As RestaurantBillingInfoRowChangeEventHandler
5947         
5948         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5949         Public Event RestaurantBillingInfoRowChanged As RestaurantBillingInfoRowChangeEventHandler
5950         
5951         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5952         Public Event RestaurantBillingInfoRowDeleting As RestaurantBillingInfoRowChangeEventHandler
5953         
5954         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5955         Public Event RestaurantBillingInfoRowDeleted As RestaurantBillingInfoRowChangeEventHandler
5956         
5957         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5958          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5959         Public Overloads Sub AddRestaurantBillingInfoRow(ByVal row As RestaurantBillingInfoRow)
5960             Me.Rows.Add(row)
5961         End Sub
5962         
5963         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
5964          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
5965         Public Overloads Function AddRestaurantBillingInfoRow( _
5966                     ByVal BillId As Integer, _
5967                     ByVal BillType As String, _
5968                     ByVal BillDate As Date, _
5969                     ByVal CustomerName As String, _
5970                     ByVal AddressLine1 As String, _
5971                     ByVal AddressLine2 As String, _
5972                     ByVal AddressLine3 As String, _
5973                     ByVal ContactNo As String, _
5974                     ByVal PaymentMode As String, _
5975                     ByVal SubTotal As Decimal, _
5976                     ByVal ItemDiscount As Decimal, _
5977                     ByVal DiscountPer As Decimal, _
5978                     ByVal Discount As Decimal, _
5979                     ByVal VAT As Decimal, _
5980                     ByVal ServiceTax As Decimal, _
5981                     ByVal ServiceCharges As Decimal, _
5982                     ByVal TACharges As Decimal, _
5983                     ByVal HDCharges As Decimal, _
5984                     ByVal GrandTotal As Decimal, _
5985                     ByVal Cash As Decimal, _
5986                     ByVal Change As Decimal, _
5987                     ByVal parentRegistrationRowByRegistrationRestaurantBillingInfo As RegistrationRow, _
5988                     ByVal BillNote As String) As RestaurantBillingInfoRow
5989             Dim rowRestaurantBillingInfoRow As RestaurantBillingInfoRow = CType(Me.NewRow,RestaurantBillingInfoRow)
5990             Dim columnValuesArray() As Object = New Object() {BillId, BillType, BillDate, CustomerName, AddressLine1, AddressLine2, AddressLine3, ContactNo, PaymentMode, SubTotal, ItemDiscount, DiscountPer, Discount, VAT, ServiceTax, ServiceCharges, TACharges, HDCharges, GrandTotal, Cash, Change, Nothing, BillNote}
5991             If (Not (parentRegistrationRowByRegistrationRestaurantBillingInfo) Is Nothing) Then
5992                 columnValuesArray(21) = parentRegistrationRowByRegistrationRestaurantBillingInfo(0)
5993             End If
5994             rowRestaurantBillingInfoRow.ItemArray = columnValuesArray
5995             Me.Rows.Add(rowRestaurantBillingInfoRow)
5996             Return rowRestaurantBillingInfoRow
5997         End Function
5998         
5999         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6000          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6001         Public Function FindByBillId(ByVal BillId As Integer) As RestaurantBillingInfoRow
6002             Return CType(Me.Rows.Find(New Object() {BillId}),RestaurantBillingInfoRow)
6003         End Function
6004         
6005         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6006          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6007         Public Overrides Function Clone() As Global.System.Data.DataTable
6008             Dim cln As RestaurantBillingInfoDataTable = CType(MyBase.Clone,RestaurantBillingInfoDataTable)
6009             cln.InitVars
6010             Return cln
6011         End Function
6012         
6013         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6014          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6015         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
6016             Return New RestaurantBillingInfoDataTable()
6017         End Function
6018         
6019         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6020          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6021         Friend Sub InitVars()
6022             Me.columnBillId = MyBase.Columns("BillId")
6023             Me.columnBillType = MyBase.Columns("BillType")
6024             Me.columnBillDate = MyBase.Columns("BillDate")
6025             Me.columnCustomerName = MyBase.Columns("CustomerName")
6026             Me.columnAddressLine1 = MyBase.Columns("AddressLine1")
6027             Me.columnAddressLine2 = MyBase.Columns("AddressLine2")
6028             Me.columnAddressLine3 = MyBase.Columns("AddressLine3")
6029             Me.columnContactNo = MyBase.Columns("ContactNo")
6030             Me.columnPaymentMode = MyBase.Columns("PaymentMode")
6031             Me.columnSubTotal = MyBase.Columns("SubTotal")
6032             Me.columnItemDiscount = MyBase.Columns("ItemDiscount")
6033             Me.columnDiscountPer = MyBase.Columns("DiscountPer")
6034             Me.columnDiscount = MyBase.Columns("Discount")
6035             Me.columnVAT = MyBase.Columns("VAT")
6036             Me.columnServiceTax = MyBase.Columns("ServiceTax")
6037             Me.columnServiceCharges = MyBase.Columns("ServiceCharges")
6038             Me.columnTACharges = MyBase.Columns("TACharges")
6039             Me.columnHDCharges = MyBase.Columns("HDCharges")
6040             Me.columnGrandTotal = MyBase.Columns("GrandTotal")
6041             Me.columnCash = MyBase.Columns("Cash")
6042             Me.columnChange = MyBase.Columns("Change")
6043             Me.columnOperatorID = MyBase.Columns("OperatorID")
6044             Me.columnBillNote = MyBase.Columns("BillNote")
6045         End Sub
6046         
6047         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6048          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6049         Private Sub InitClass()
6050             Me.columnBillId = New Global.System.Data.DataColumn("BillId", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
6051             MyBase.Columns.Add(Me.columnBillId)
6052             Me.columnBillType = New Global.System.Data.DataColumn("BillType", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6053             MyBase.Columns.Add(Me.columnBillType)
6054             Me.columnBillDate = New Global.System.Data.DataColumn("BillDate", GetType(Date), Nothing, Global.System.Data.MappingType.Element)
6055             MyBase.Columns.Add(Me.columnBillDate)
6056             Me.columnCustomerName = New Global.System.Data.DataColumn("CustomerName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6057             MyBase.Columns.Add(Me.columnCustomerName)
6058             Me.columnAddressLine1 = New Global.System.Data.DataColumn("AddressLine1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6059             MyBase.Columns.Add(Me.columnAddressLine1)
6060             Me.columnAddressLine2 = New Global.System.Data.DataColumn("AddressLine2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6061             MyBase.Columns.Add(Me.columnAddressLine2)
6062             Me.columnAddressLine3 = New Global.System.Data.DataColumn("AddressLine3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6063             MyBase.Columns.Add(Me.columnAddressLine3)
6064             Me.columnContactNo = New Global.System.Data.DataColumn("ContactNo", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6065             MyBase.Columns.Add(Me.columnContactNo)
6066             Me.columnPaymentMode = New Global.System.Data.DataColumn("PaymentMode", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6067             MyBase.Columns.Add(Me.columnPaymentMode)
6068             Me.columnSubTotal = New Global.System.Data.DataColumn("SubTotal", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6069             MyBase.Columns.Add(Me.columnSubTotal)
6070             Me.columnItemDiscount = New Global.System.Data.DataColumn("ItemDiscount", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6071             MyBase.Columns.Add(Me.columnItemDiscount)
6072             Me.columnDiscountPer = New Global.System.Data.DataColumn("DiscountPer", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6073             MyBase.Columns.Add(Me.columnDiscountPer)
6074             Me.columnDiscount = New Global.System.Data.DataColumn("Discount", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6075             MyBase.Columns.Add(Me.columnDiscount)
6076             Me.columnVAT = New Global.System.Data.DataColumn("VAT", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6077             MyBase.Columns.Add(Me.columnVAT)
6078             Me.columnServiceTax = New Global.System.Data.DataColumn("ServiceTax", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6079             MyBase.Columns.Add(Me.columnServiceTax)
6080             Me.columnServiceCharges = New Global.System.Data.DataColumn("ServiceCharges", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6081             MyBase.Columns.Add(Me.columnServiceCharges)
6082             Me.columnTACharges = New Global.System.Data.DataColumn("TACharges", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6083             MyBase.Columns.Add(Me.columnTACharges)
6084             Me.columnHDCharges = New Global.System.Data.DataColumn("HDCharges", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6085             MyBase.Columns.Add(Me.columnHDCharges)
6086             Me.columnGrandTotal = New Global.System.Data.DataColumn("GrandTotal", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6087             MyBase.Columns.Add(Me.columnGrandTotal)
6088             Me.columnCash = New Global.System.Data.DataColumn("Cash", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6089             MyBase.Columns.Add(Me.columnCash)
6090             Me.columnChange = New Global.System.Data.DataColumn("Change", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6091             MyBase.Columns.Add(Me.columnChange)
6092             Me.columnOperatorID = New Global.System.Data.DataColumn("OperatorID", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6093             MyBase.Columns.Add(Me.columnOperatorID)
6094             Me.columnBillNote = New Global.System.Data.DataColumn("BillNote", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6095             MyBase.Columns.Add(Me.columnBillNote)
6096             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnBillId}, true))
6097             Me.columnBillId.AllowDBNull = false
6098             Me.columnBillId.Unique = true
6099             Me.columnBillType.MaxLength = 255
6100             Me.columnCustomerName.MaxLength = 255
6101             Me.columnAddressLine1.MaxLength = 255
6102             Me.columnAddressLine2.MaxLength = 255
6103             Me.columnAddressLine3.MaxLength = 255
6104             Me.columnContactNo.MaxLength = 255
6105             Me.columnPaymentMode.MaxLength = 255
6106             Me.columnOperatorID.MaxLength = 255
6107             Me.columnBillNote.MaxLength = 255
6108         End Sub
6109         
6110         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6111          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6112         Public Function NewRestaurantBillingInfoRow() As RestaurantBillingInfoRow
6113             Return CType(Me.NewRow,RestaurantBillingInfoRow)
6114         End Function
6115         
6116         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6117          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6118         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
6119             Return New RestaurantBillingInfoRow(builder)
6120         End Function
6121         
6122         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6123          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6124         Protected Overrides Function GetRowType() As Global.System.Type
6125             Return GetType(RestaurantBillingInfoRow)
6126         End Function
6127         
6128         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6129          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6130         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
6131             MyBase.OnRowChanged(e)
6132             If (Not (Me.RestaurantBillingInfoRowChangedEvent) Is Nothing) Then
6133                 RaiseEvent RestaurantBillingInfoRowChanged(Me, New RestaurantBillingInfoRowChangeEvent(CType(e.Row,RestaurantBillingInfoRow), e.Action))
6134             End If
6135         End Sub
6136         
6137         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6138          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6139         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
6140             MyBase.OnRowChanging(e)
6141             If (Not (Me.RestaurantBillingInfoRowChangingEvent) Is Nothing) Then
6142                 RaiseEvent RestaurantBillingInfoRowChanging(Me, New RestaurantBillingInfoRowChangeEvent(CType(e.Row,RestaurantBillingInfoRow), e.Action))
6143             End If
6144         End Sub
6145         
6146         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6147          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6148         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
6149             MyBase.OnRowDeleted(e)
6150             If (Not (Me.RestaurantBillingInfoRowDeletedEvent) Is Nothing) Then
6151                 RaiseEvent RestaurantBillingInfoRowDeleted(Me, New RestaurantBillingInfoRowChangeEvent(CType(e.Row,RestaurantBillingInfoRow), e.Action))
6152             End If
6153         End Sub
6154         
6155         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6156          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6157         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
6158             MyBase.OnRowDeleting(e)
6159             If (Not (Me.RestaurantBillingInfoRowDeletingEvent) Is Nothing) Then
6160                 RaiseEvent RestaurantBillingInfoRowDeleting(Me, New RestaurantBillingInfoRowChangeEvent(CType(e.Row,RestaurantBillingInfoRow), e.Action))
6161             End If
6162         End Sub
6163         
6164         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6165          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6166         Public Sub RemoveRestaurantBillingInfoRow(ByVal row As RestaurantBillingInfoRow)
6167             Me.Rows.Remove(row)
6168         End Sub
6169         
6170         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6171          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6172         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
6173             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
6174             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
6175             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
6176             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
6177             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
6178             any1.MinOccurs = New Decimal(0)
6179             any1.MaxOccurs = Decimal.MaxValue
6180             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
6181             sequence.Items.Add(any1)
6182             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
6183             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
6184             any2.MinOccurs = New Decimal(1)
6185             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
6186             sequence.Items.Add(any2)
6187             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
6188             attribute1.Name = "namespace"
6189             attribute1.FixedValue = ds.Namespace
6190             type.Attributes.Add(attribute1)
6191             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
6192             attribute2.Name = "tableTypeName"
6193             attribute2.FixedValue = "RestaurantBillingInfoDataTable"
6194             type.Attributes.Add(attribute2)
6195             type.Particle = sequence
6196             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
6197             If xs.Contains(dsSchema.TargetNamespace) Then
6198                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
6199                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
6200                 Try
6201                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
6202                     dsSchema.Write(s1)
6203                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
6204                     Do While schemas.MoveNext
6205                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
6206                         s2.SetLength(0)
6207                         schema.Write(s2)
6208                         If (s1.Length = s2.Length) Then
6209                             s1.Position = 0
6210                             s2.Position = 0
6211                             
6212                             Do While ((s1.Position <> s1.Length) _
6213                                         AndAlso (s1.ReadByte = s2.ReadByte))
6214                                 
6215                                 
6216                             Loop
6217                             If (s1.Position = s1.Length) Then
6218                                 Return type
6219                             End If
6220                         End If
6221                         
6222                     Loop
6223                 Finally
6224                     If (Not (s1) Is Nothing) Then
6225                         s1.Close
6226                     End If
6227                     If (Not (s2) Is Nothing) Then
6228                         s2.Close
6229                     End If
6230                 End Try
6231             End If
6232             xs.Add(dsSchema)
6233             Return type
6234         End Function
6235     End Class
6236     
6237     '''<summary>
6238     '''Represents the strongly named DataTable class.
6239     '''</summary>
6240     <Global.System.Serializable(), _
6241      Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
6242     Partial Public Class RestaurantBillingItemsDataTable
6243         Inherits Global.System.Data.TypedTableBase(Of RestaurantBillingItemsRow)
6244         
6245         Private columnP_ID As Global.System.Data.DataColumn
6246         
6247         Private columnB_ID As Global.System.Data.DataColumn
6248         
6249         Private columnItem_ID As Global.System.Data.DataColumn
6250         
6251         Private columnQty As Global.System.Data.DataColumn
6252         
6253         Private columnRate As Global.System.Data.DataColumn
6254         
6255         Private columnAmount As Global.System.Data.DataColumn
6256         
6257         Private columnDiscPer As Global.System.Data.DataColumn
6258         
6259         Private columnDisc As Global.System.Data.DataColumn
6260         
6261         Private columnVATPer As Global.System.Data.DataColumn
6262         
6263         Private columnVATAmt As Global.System.Data.DataColumn
6264         
6265         Private columnSTPer As Global.System.Data.DataColumn
6266         
6267         Private columnSTAmt As Global.System.Data.DataColumn
6268         
6269         Private columnSCPer As Global.System.Data.DataColumn
6270         
6271         Private columnSCAmt As Global.System.Data.DataColumn
6272         
6273         Private columnTotalAmt As Global.System.Data.DataColumn
6274         
6275         Private columnItemNote As Global.System.Data.DataColumn
6276         
6277         Private columnTableNo As Global.System.Data.DataColumn
6278         
6279         Private columnGroupName As Global.System.Data.DataColumn
6280         
6281         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6282          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6283         Public Sub New()
6284             MyBase.New
6285             Me.TableName = "RestaurantBillingItems"
6286             Me.BeginInit
6287             Me.InitClass
6288             Me.EndInit
6289         End Sub
6290         
6291         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6292          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6293         Friend Sub New(ByVal table As Global.System.Data.DataTable)
6294             MyBase.New
6295             Me.TableName = table.TableName
6296             If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
6297                 Me.CaseSensitive = table.CaseSensitive
6298             End If
6299             If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
6300                 Me.Locale = table.Locale
6301             End If
6302             If (table.Namespace <> table.DataSet.Namespace) Then
6303                 Me.Namespace = table.Namespace
6304             End If
6305             Me.Prefix = table.Prefix
6306             Me.MinimumCapacity = table.MinimumCapacity
6307         End Sub
6308         
6309         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6310          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6311         Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
6312             MyBase.New(info, context)
6313             Me.InitVars
6314         End Sub
6315         
6316         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6317          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6318         Public ReadOnly Property P_IDColumn() As Global.System.Data.DataColumn
6319             Get
6320                 Return Me.columnP_ID
6321             End Get
6322         End Property
6323         
6324         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6325          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6326         Public ReadOnly Property B_IDColumn() As Global.System.Data.DataColumn
6327             Get
6328                 Return Me.columnB_ID
6329             End Get
6330         End Property
6331         
6332         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6333          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6334         Public ReadOnly Property Item_IDColumn() As Global.System.Data.DataColumn
6335             Get
6336                 Return Me.columnItem_ID
6337             End Get
6338         End Property
6339         
6340         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6341          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6342         Public ReadOnly Property QtyColumn() As Global.System.Data.DataColumn
6343             Get
6344                 Return Me.columnQty
6345             End Get
6346         End Property
6347         
6348         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6349          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6350         Public ReadOnly Property RateColumn() As Global.System.Data.DataColumn
6351             Get
6352                 Return Me.columnRate
6353             End Get
6354         End Property
6355         
6356         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6357          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6358         Public ReadOnly Property AmountColumn() As Global.System.Data.DataColumn
6359             Get
6360                 Return Me.columnAmount
6361             End Get
6362         End Property
6363         
6364         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6365          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6366         Public ReadOnly Property DiscPerColumn() As Global.System.Data.DataColumn
6367             Get
6368                 Return Me.columnDiscPer
6369             End Get
6370         End Property
6371         
6372         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6373          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6374         Public ReadOnly Property DiscColumn() As Global.System.Data.DataColumn
6375             Get
6376                 Return Me.columnDisc
6377             End Get
6378         End Property
6379         
6380         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6381          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6382         Public ReadOnly Property VATPerColumn() As Global.System.Data.DataColumn
6383             Get
6384                 Return Me.columnVATPer
6385             End Get
6386         End Property
6387         
6388         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6389          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6390         Public ReadOnly Property VATAmtColumn() As Global.System.Data.DataColumn
6391             Get
6392                 Return Me.columnVATAmt
6393             End Get
6394         End Property
6395         
6396         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6397          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6398         Public ReadOnly Property STPerColumn() As Global.System.Data.DataColumn
6399             Get
6400                 Return Me.columnSTPer
6401             End Get
6402         End Property
6403         
6404         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6405          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6406         Public ReadOnly Property STAmtColumn() As Global.System.Data.DataColumn
6407             Get
6408                 Return Me.columnSTAmt
6409             End Get
6410         End Property
6411         
6412         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6413          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6414         Public ReadOnly Property SCPerColumn() As Global.System.Data.DataColumn
6415             Get
6416                 Return Me.columnSCPer
6417             End Get
6418         End Property
6419         
6420         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6421          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6422         Public ReadOnly Property SCAmtColumn() As Global.System.Data.DataColumn
6423             Get
6424                 Return Me.columnSCAmt
6425             End Get
6426         End Property
6427         
6428         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6429          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6430         Public ReadOnly Property TotalAmtColumn() As Global.System.Data.DataColumn
6431             Get
6432                 Return Me.columnTotalAmt
6433             End Get
6434         End Property
6435         
6436         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6437          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6438         Public ReadOnly Property ItemNoteColumn() As Global.System.Data.DataColumn
6439             Get
6440                 Return Me.columnItemNote
6441             End Get
6442         End Property
6443         
6444         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6445          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6446         Public ReadOnly Property TableNoColumn() As Global.System.Data.DataColumn
6447             Get
6448                 Return Me.columnTableNo
6449             End Get
6450         End Property
6451         
6452         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6453          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6454         Public ReadOnly Property GroupNameColumn() As Global.System.Data.DataColumn
6455             Get
6456                 Return Me.columnGroupName
6457             End Get
6458         End Property
6459         
6460         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6461          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
6462          Global.System.ComponentModel.Browsable(false)> _
6463         Public ReadOnly Property Count() As Integer
6464             Get
6465                 Return Me.Rows.Count
6466             End Get
6467         End Property
6468         
6469         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6470          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6471         Public Default ReadOnly Property Item(ByVal index As Integer) As RestaurantBillingItemsRow
6472             Get
6473                 Return CType(Me.Rows(index),RestaurantBillingItemsRow)
6474             End Get
6475         End Property
6476         
6477         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6478         Public Event RestaurantBillingItemsRowChanging As RestaurantBillingItemsRowChangeEventHandler
6479         
6480         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6481         Public Event RestaurantBillingItemsRowChanged As RestaurantBillingItemsRowChangeEventHandler
6482         
6483         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6484         Public Event RestaurantBillingItemsRowDeleting As RestaurantBillingItemsRowChangeEventHandler
6485         
6486         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6487         Public Event RestaurantBillingItemsRowDeleted As RestaurantBillingItemsRowChangeEventHandler
6488         
6489         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6490          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6491         Public Overloads Sub AddRestaurantBillingItemsRow(ByVal row As RestaurantBillingItemsRow)
6492             Me.Rows.Add(row)
6493         End Sub
6494         
6495         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6496          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6497         Public Overloads Function AddRestaurantBillingItemsRow( _
6498                     ByVal parentRestaurantBillingInfoRowByRestaurantBillingInfoRestaurantBillingItems As RestaurantBillingInfoRow, _
6499                     ByVal parentDishRowByDishRestaurantBillingItems As DishRow, _
6500                     ByVal Qty As Decimal, _
6501                     ByVal Rate As Decimal, _
6502                     ByVal Amount As Decimal, _
6503                     ByVal DiscPer As Decimal, _
6504                     ByVal Disc As Decimal, _
6505                     ByVal VATPer As Decimal, _
6506                     ByVal VATAmt As Decimal, _
6507                     ByVal STPer As Decimal, _
6508                     ByVal STAmt As Decimal, _
6509                     ByVal SCPer As Decimal, _
6510                     ByVal SCAmt As Decimal, _
6511                     ByVal TotalAmt As Decimal, _
6512                     ByVal ItemNote As String, _
6513                     ByVal TableNo As String, _
6514                     ByVal GroupName As String) As RestaurantBillingItemsRow
6515             Dim rowRestaurantBillingItemsRow As RestaurantBillingItemsRow = CType(Me.NewRow,RestaurantBillingItemsRow)
6516             Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, Nothing, Qty, Rate, Amount, DiscPer, Disc, VATPer, VATAmt, STPer, STAmt, SCPer, SCAmt, TotalAmt, ItemNote, TableNo, GroupName}
6517             If (Not (parentRestaurantBillingInfoRowByRestaurantBillingInfoRestaurantBillingItems) Is Nothing) Then
6518                 columnValuesArray(1) = parentRestaurantBillingInfoRowByRestaurantBillingInfoRestaurantBillingItems(0)
6519             End If
6520             If (Not (parentDishRowByDishRestaurantBillingItems) Is Nothing) Then
6521                 columnValuesArray(2) = parentDishRowByDishRestaurantBillingItems(0)
6522             End If
6523             rowRestaurantBillingItemsRow.ItemArray = columnValuesArray
6524             Me.Rows.Add(rowRestaurantBillingItemsRow)
6525             Return rowRestaurantBillingItemsRow
6526         End Function
6527         
6528         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6529          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6530         Public Function FindByP_ID(ByVal P_ID As Integer) As RestaurantBillingItemsRow
6531             Return CType(Me.Rows.Find(New Object() {P_ID}),RestaurantBillingItemsRow)
6532         End Function
6533         
6534         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6535          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6536         Public Overrides Function Clone() As Global.System.Data.DataTable
6537             Dim cln As RestaurantBillingItemsDataTable = CType(MyBase.Clone,RestaurantBillingItemsDataTable)
6538             cln.InitVars
6539             Return cln
6540         End Function
6541         
6542         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6543          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6544         Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
6545             Return New RestaurantBillingItemsDataTable()
6546         End Function
6547         
6548         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6549          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6550         Friend Sub InitVars()
6551             Me.columnP_ID = MyBase.Columns("P_ID")
6552             Me.columnB_ID = MyBase.Columns("B_ID")
6553             Me.columnItem_ID = MyBase.Columns("Item_ID")
6554             Me.columnQty = MyBase.Columns("Qty")
6555             Me.columnRate = MyBase.Columns("Rate")
6556             Me.columnAmount = MyBase.Columns("Amount")
6557             Me.columnDiscPer = MyBase.Columns("DiscPer")
6558             Me.columnDisc = MyBase.Columns("Disc")
6559             Me.columnVATPer = MyBase.Columns("VATPer")
6560             Me.columnVATAmt = MyBase.Columns("VATAmt")
6561             Me.columnSTPer = MyBase.Columns("STPer")
6562             Me.columnSTAmt = MyBase.Columns("STAmt")
6563             Me.columnSCPer = MyBase.Columns("SCPer")
6564             Me.columnSCAmt = MyBase.Columns("SCAmt")
6565             Me.columnTotalAmt = MyBase.Columns("TotalAmt")
6566             Me.columnItemNote = MyBase.Columns("ItemNote")
6567             Me.columnTableNo = MyBase.Columns("TableNo")
6568             Me.columnGroupName = MyBase.Columns("GroupName")
6569         End Sub
6570         
6571         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6572          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6573         Private Sub InitClass()
6574             Me.columnP_ID = New Global.System.Data.DataColumn("P_ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
6575             MyBase.Columns.Add(Me.columnP_ID)
6576             Me.columnB_ID = New Global.System.Data.DataColumn("B_ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
6577             MyBase.Columns.Add(Me.columnB_ID)
6578             Me.columnItem_ID = New Global.System.Data.DataColumn("Item_ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
6579             MyBase.Columns.Add(Me.columnItem_ID)
6580             Me.columnQty = New Global.System.Data.DataColumn("Qty", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6581             MyBase.Columns.Add(Me.columnQty)
6582             Me.columnRate = New Global.System.Data.DataColumn("Rate", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6583             MyBase.Columns.Add(Me.columnRate)
6584             Me.columnAmount = New Global.System.Data.DataColumn("Amount", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6585             MyBase.Columns.Add(Me.columnAmount)
6586             Me.columnDiscPer = New Global.System.Data.DataColumn("DiscPer", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6587             MyBase.Columns.Add(Me.columnDiscPer)
6588             Me.columnDisc = New Global.System.Data.DataColumn("Disc", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6589             MyBase.Columns.Add(Me.columnDisc)
6590             Me.columnVATPer = New Global.System.Data.DataColumn("VATPer", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6591             MyBase.Columns.Add(Me.columnVATPer)
6592             Me.columnVATAmt = New Global.System.Data.DataColumn("VATAmt", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6593             MyBase.Columns.Add(Me.columnVATAmt)
6594             Me.columnSTPer = New Global.System.Data.DataColumn("STPer", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6595             MyBase.Columns.Add(Me.columnSTPer)
6596             Me.columnSTAmt = New Global.System.Data.DataColumn("STAmt", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6597             MyBase.Columns.Add(Me.columnSTAmt)
6598             Me.columnSCPer = New Global.System.Data.DataColumn("SCPer", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6599             MyBase.Columns.Add(Me.columnSCPer)
6600             Me.columnSCAmt = New Global.System.Data.DataColumn("SCAmt", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6601             MyBase.Columns.Add(Me.columnSCAmt)
6602             Me.columnTotalAmt = New Global.System.Data.DataColumn("TotalAmt", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
6603             MyBase.Columns.Add(Me.columnTotalAmt)
6604             Me.columnItemNote = New Global.System.Data.DataColumn("ItemNote", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6605             MyBase.Columns.Add(Me.columnItemNote)
6606             Me.columnTableNo = New Global.System.Data.DataColumn("TableNo", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6607             MyBase.Columns.Add(Me.columnTableNo)
6608             Me.columnGroupName = New Global.System.Data.DataColumn("GroupName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
6609             MyBase.Columns.Add(Me.columnGroupName)
6610             Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnP_ID}, true))
6611             Me.columnP_ID.AutoIncrement = true
6612             Me.columnP_ID.AutoIncrementSeed = -1
6613             Me.columnP_ID.AutoIncrementStep = -1
6614             Me.columnP_ID.AllowDBNull = false
6615             Me.columnP_ID.Unique = true
6616             Me.columnItemNote.MaxLength = 255
6617             Me.columnTableNo.MaxLength = 255
6618             Me.columnGroupName.MaxLength = 255
6619         End Sub
6620         
6621         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6622          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6623         Public Function NewRestaurantBillingItemsRow() As RestaurantBillingItemsRow
6624             Return CType(Me.NewRow,RestaurantBillingItemsRow)
6625         End Function
6626         
6627         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6628          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6629         Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
6630             Return New RestaurantBillingItemsRow(builder)
6631         End Function
6632         
6633         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6634          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6635         Protected Overrides Function GetRowType() As Global.System.Type
6636             Return GetType(RestaurantBillingItemsRow)
6637         End Function
6638         
6639         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6640          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6641         Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
6642             MyBase.OnRowChanged(e)
6643             If (Not (Me.RestaurantBillingItemsRowChangedEvent) Is Nothing) Then
6644                 RaiseEvent RestaurantBillingItemsRowChanged(Me, New RestaurantBillingItemsRowChangeEvent(CType(e.Row,RestaurantBillingItemsRow), e.Action))
6645             End If
6646         End Sub
6647         
6648         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6649          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6650         Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
6651             MyBase.OnRowChanging(e)
6652             If (Not (Me.RestaurantBillingItemsRowChangingEvent) Is Nothing) Then
6653                 RaiseEvent RestaurantBillingItemsRowChanging(Me, New RestaurantBillingItemsRowChangeEvent(CType(e.Row,RestaurantBillingItemsRow), e.Action))
6654             End If
6655         End Sub
6656         
6657         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6658          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6659         Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
6660             MyBase.OnRowDeleted(e)
6661             If (Not (Me.RestaurantBillingItemsRowDeletedEvent) Is Nothing) Then
6662                 RaiseEvent RestaurantBillingItemsRowDeleted(Me, New RestaurantBillingItemsRowChangeEvent(CType(e.Row,RestaurantBillingItemsRow), e.Action))
6663             End If
6664         End Sub
6665         
6666         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6667          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6668         Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
6669             MyBase.OnRowDeleting(e)
6670             If (Not (Me.RestaurantBillingItemsRowDeletingEvent) Is Nothing) Then
6671                 RaiseEvent RestaurantBillingItemsRowDeleting(Me, New RestaurantBillingItemsRowChangeEvent(CType(e.Row,RestaurantBillingItemsRow), e.Action))
6672             End If
6673         End Sub
6674         
6675         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6676          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6677         Public Sub RemoveRestaurantBillingItemsRow(ByVal row As RestaurantBillingItemsRow)
6678             Me.Rows.Remove(row)
6679         End Sub
6680         
6681         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6682          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6683         Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
6684             Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
6685             Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
6686             Dim ds As RPOS_DBDataSet = New RPOS_DBDataSet()
6687             Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
6688             any1.Namespace = "http://www.w3.org/2001/XMLSchema"
6689             any1.MinOccurs = New Decimal(0)
6690             any1.MaxOccurs = Decimal.MaxValue
6691             any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
6692             sequence.Items.Add(any1)
6693             Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny()
6694             any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
6695             any2.MinOccurs = New Decimal(1)
6696             any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
6697             sequence.Items.Add(any2)
6698             Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
6699             attribute1.Name = "namespace"
6700             attribute1.FixedValue = ds.Namespace
6701             type.Attributes.Add(attribute1)
6702             Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
6703             attribute2.Name = "tableTypeName"
6704             attribute2.FixedValue = "RestaurantBillingItemsDataTable"
6705             type.Attributes.Add(attribute2)
6706             type.Particle = sequence
6707             Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
6708             If xs.Contains(dsSchema.TargetNamespace) Then
6709                 Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
6710                 Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
6711                 Try
6712                     Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
6713                     dsSchema.Write(s1)
6714                     Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
6715                     Do While schemas.MoveNext
6716                         schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
6717                         s2.SetLength(0)
6718                         schema.Write(s2)
6719                         If (s1.Length = s2.Length) Then
6720                             s1.Position = 0
6721                             s2.Position = 0
6722                             
6723                             Do While ((s1.Position <> s1.Length) _
6724                                         AndAlso (s1.ReadByte = s2.ReadByte))
6725                                 
6726                                 
6727                             Loop
6728                             If (s1.Position = s1.Length) Then
6729                                 Return type
6730                             End If
6731                         End If
6732                         
6733                     Loop
6734                 Finally
6735                     If (Not (s1) Is Nothing) Then
6736                         s1.Close
6737                     End If
6738                     If (Not (s2) Is Nothing) Then
6739                         s2.Close
6740                     End If
6741                 End Try
6742             End If
6743             xs.Add(dsSchema)
6744             Return type
6745         End Function
6746     End Class
6747     
6748     '''<summary>
6749     '''Represents strongly named DataRow class.
6750     '''</summary>
6751     Partial Public Class ActivationRow
6752         Inherits Global.System.Data.DataRow
6753         
6754         Private tableActivation As ActivationDataTable
6755         
6756         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6757          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6758         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
6759             MyBase.New(rb)
6760             Me.tableActivation = CType(Me.Table,ActivationDataTable)
6761         End Sub
6762         
6763         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6764          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6765         Public Property Id() As Integer
6766             Get
6767                 Return CType(Me(Me.tableActivation.IdColumn),Integer)
6768             End Get
6769             Set
6770                 Me(Me.tableActivation.IdColumn) = value
6771             End Set
6772         End Property
6773         
6774         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6775          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6776         Public Property HardwareID() As String
6777             Get
6778                 Try
6779                     Return CType(Me(Me.tableActivation.HardwareIDColumn),String)
6780                 Catch e As Global.System.InvalidCastException
6781                     Throw New Global.System.Data.StrongTypingException("The value for column 'HardwareID' in table 'Activation' is DBNull.", e)
6782                 End Try
6783             End Get
6784             Set
6785                 Me(Me.tableActivation.HardwareIDColumn) = value
6786             End Set
6787         End Property
6788         
6789         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6790          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6791         Public Property ActivationID() As String
6792             Get
6793                 Try
6794                     Return CType(Me(Me.tableActivation.ActivationIDColumn),String)
6795                 Catch e As Global.System.InvalidCastException
6796                     Throw New Global.System.Data.StrongTypingException("The value for column 'ActivationID' in table 'Activation' is DBNull.", e)
6797                 End Try
6798             End Get
6799             Set
6800                 Me(Me.tableActivation.ActivationIDColumn) = value
6801             End Set
6802         End Property
6803         
6804         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6805          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6806         Public Function IsHardwareIDNull() As Boolean
6807             Return Me.IsNull(Me.tableActivation.HardwareIDColumn)
6808         End Function
6809         
6810         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6811          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6812         Public Sub SetHardwareIDNull()
6813             Me(Me.tableActivation.HardwareIDColumn) = Global.System.Convert.DBNull
6814         End Sub
6815         
6816         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6817          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6818         Public Function IsActivationIDNull() As Boolean
6819             Return Me.IsNull(Me.tableActivation.ActivationIDColumn)
6820         End Function
6821         
6822         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6823          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6824         Public Sub SetActivationIDNull()
6825             Me(Me.tableActivation.ActivationIDColumn) = Global.System.Convert.DBNull
6826         End Sub
6827     End Class
6828     
6829     '''<summary>
6830     '''Represents strongly named DataRow class.
6831     '''</summary>
6832     Partial Public Class CategoryRow
6833         Inherits Global.System.Data.DataRow
6834         
6835         Private tableCategory As CategoryDataTable
6836         
6837         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6838          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6839         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
6840             MyBase.New(rb)
6841             Me.tableCategory = CType(Me.Table,CategoryDataTable)
6842         End Sub
6843         
6844         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6845          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6846         Public Property CategoryName() As String
6847             Get
6848                 Return CType(Me(Me.tableCategory.CategoryNameColumn),String)
6849             End Get
6850             Set
6851                 Me(Me.tableCategory.CategoryNameColumn) = value
6852             End Set
6853         End Property
6854         
6855         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6856          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6857         Public Property VAT() As Decimal
6858             Get
6859                 Try
6860                     Return CType(Me(Me.tableCategory.VATColumn),Decimal)
6861                 Catch e As Global.System.InvalidCastException
6862                     Throw New Global.System.Data.StrongTypingException("The value for column 'VAT' in table 'Category' is DBNull.", e)
6863                 End Try
6864             End Get
6865             Set
6866                 Me(Me.tableCategory.VATColumn) = value
6867             End Set
6868         End Property
6869         
6870         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6871          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6872         Public Property ST() As Decimal
6873             Get
6874                 Try
6875                     Return CType(Me(Me.tableCategory.STColumn),Decimal)
6876                 Catch e As Global.System.InvalidCastException
6877                     Throw New Global.System.Data.StrongTypingException("The value for column 'ST' in table 'Category' is DBNull.", e)
6878                 End Try
6879             End Get
6880             Set
6881                 Me(Me.tableCategory.STColumn) = value
6882             End Set
6883         End Property
6884         
6885         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6886          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6887         Public Property SC() As Decimal
6888             Get
6889                 Try
6890                     Return CType(Me(Me.tableCategory.SCColumn),Decimal)
6891                 Catch e As Global.System.InvalidCastException
6892                     Throw New Global.System.Data.StrongTypingException("The value for column 'SC' in table 'Category' is DBNull.", e)
6893                 End Try
6894             End Get
6895             Set
6896                 Me(Me.tableCategory.SCColumn) = value
6897             End Set
6898         End Property
6899         
6900         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6901          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6902         Public Function IsVATNull() As Boolean
6903             Return Me.IsNull(Me.tableCategory.VATColumn)
6904         End Function
6905         
6906         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6907          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6908         Public Sub SetVATNull()
6909             Me(Me.tableCategory.VATColumn) = Global.System.Convert.DBNull
6910         End Sub
6911         
6912         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6913          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6914         Public Function IsSTNull() As Boolean
6915             Return Me.IsNull(Me.tableCategory.STColumn)
6916         End Function
6917         
6918         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6919          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6920         Public Sub SetSTNull()
6921             Me(Me.tableCategory.STColumn) = Global.System.Convert.DBNull
6922         End Sub
6923         
6924         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6925          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6926         Public Function IsSCNull() As Boolean
6927             Return Me.IsNull(Me.tableCategory.SCColumn)
6928         End Function
6929         
6930         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6931          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6932         Public Sub SetSCNull()
6933             Me(Me.tableCategory.SCColumn) = Global.System.Convert.DBNull
6934         End Sub
6935         
6936         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6937          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6938         Public Function GetDishRows() As DishRow()
6939             If (Me.Table.ChildRelations("CategoryDish") Is Nothing) Then
6940                 Return New DishRow(-1) {}
6941             Else
6942                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("CategoryDish")),DishRow())
6943             End If
6944         End Function
6945     End Class
6946     
6947     '''<summary>
6948     '''Represents strongly named DataRow class.
6949     '''</summary>
6950     Partial Public Class DishRow
6951         Inherits Global.System.Data.DataRow
6952         
6953         Private tableDish As DishDataTable
6954         
6955         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6956          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6957         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
6958             MyBase.New(rb)
6959             Me.tableDish = CType(Me.Table,DishDataTable)
6960         End Sub
6961         
6962         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6963          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6964         Public Property ItemID() As Integer
6965             Get
6966                 Return CType(Me(Me.tableDish.ItemIDColumn),Integer)
6967             End Get
6968             Set
6969                 Me(Me.tableDish.ItemIDColumn) = value
6970             End Set
6971         End Property
6972         
6973         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6974          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6975         Public Property Dishname() As String
6976             Get
6977                 Try
6978                     Return CType(Me(Me.tableDish.DishnameColumn),String)
6979                 Catch e As Global.System.InvalidCastException
6980                     Throw New Global.System.Data.StrongTypingException("The value for column 'Dishname' in table 'Dish' is DBNull.", e)
6981                 End Try
6982             End Get
6983             Set
6984                 Me(Me.tableDish.DishnameColumn) = value
6985             End Set
6986         End Property
6987         
6988         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
6989          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
6990         Public Property Category() As String
6991             Get
6992                 Try
6993                     Return CType(Me(Me.tableDish.CategoryColumn),String)
6994                 Catch e As Global.System.InvalidCastException
6995                     Throw New Global.System.Data.StrongTypingException("The value for column 'Category' in table 'Dish' is DBNull.", e)
6996                 End Try
6997             End Get
6998             Set
6999                 Me(Me.tableDish.CategoryColumn) = value
7000             End Set
7001         End Property
7002         
7003         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7004          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7005         Public Property Kitchen() As String
7006             Get
7007                 Try
7008                     Return CType(Me(Me.tableDish.KitchenColumn),String)
7009                 Catch e As Global.System.InvalidCastException
7010                     Throw New Global.System.Data.StrongTypingException("The value for column 'Kitchen' in table 'Dish' is DBNull.", e)
7011                 End Try
7012             End Get
7013             Set
7014                 Me(Me.tableDish.KitchenColumn) = value
7015             End Set
7016         End Property
7017         
7018         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7019          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7020         Public Property InventoryType() As String
7021             Get
7022                 Try
7023                     Return CType(Me(Me.tableDish.InventoryTypeColumn),String)
7024                 Catch e As Global.System.InvalidCastException
7025                     Throw New Global.System.Data.StrongTypingException("The value for column 'InventoryType' in table 'Dish' is DBNull.", e)
7026                 End Try
7027             End Get
7028             Set
7029                 Me(Me.tableDish.InventoryTypeColumn) = value
7030             End Set
7031         End Property
7032         
7033         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7034          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7035         Public Property Rate() As Decimal
7036             Get
7037                 Try
7038                     Return CType(Me(Me.tableDish.RateColumn),Decimal)
7039                 Catch e As Global.System.InvalidCastException
7040                     Throw New Global.System.Data.StrongTypingException("The value for column 'Rate' in table 'Dish' is DBNull.", e)
7041                 End Try
7042             End Get
7043             Set
7044                 Me(Me.tableDish.RateColumn) = value
7045             End Set
7046         End Property
7047         
7048         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7049          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7050         Public Property Discount() As Decimal
7051             Get
7052                 Try
7053                     Return CType(Me(Me.tableDish.DiscountColumn),Decimal)
7054                 Catch e As Global.System.InvalidCastException
7055                     Throw New Global.System.Data.StrongTypingException("The value for column 'Discount' in table 'Dish' is DBNull.", e)
7056                 End Try
7057             End Get
7058             Set
7059                 Me(Me.tableDish.DiscountColumn) = value
7060             End Set
7061         End Property
7062         
7063         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7064          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7065         Public Property CategoryRow() As CategoryRow
7066             Get
7067                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("CategoryDish")),CategoryRow)
7068             End Get
7069             Set
7070                 Me.SetParentRow(value, Me.Table.ParentRelations("CategoryDish"))
7071             End Set
7072         End Property
7073         
7074         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7075          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7076         Public Property InventoryTypeRow() As InventoryTypeRow
7077             Get
7078                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("InventoryTypeDish")),InventoryTypeRow)
7079             End Get
7080             Set
7081                 Me.SetParentRow(value, Me.Table.ParentRelations("InventoryTypeDish"))
7082             End Set
7083         End Property
7084         
7085         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7086          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7087         Public Property KitchenRow() As KitchenRow
7088             Get
7089                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("KitchenDish")),KitchenRow)
7090             End Get
7091             Set
7092                 Me.SetParentRow(value, Me.Table.ParentRelations("KitchenDish"))
7093             End Set
7094         End Property
7095         
7096         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7097          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7098         Public Function IsDishnameNull() As Boolean
7099             Return Me.IsNull(Me.tableDish.DishnameColumn)
7100         End Function
7101         
7102         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7103          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7104         Public Sub SetDishnameNull()
7105             Me(Me.tableDish.DishnameColumn) = Global.System.Convert.DBNull
7106         End Sub
7107         
7108         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7109          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7110         Public Function IsCategoryNull() As Boolean
7111             Return Me.IsNull(Me.tableDish.CategoryColumn)
7112         End Function
7113         
7114         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7115          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7116         Public Sub SetCategoryNull()
7117             Me(Me.tableDish.CategoryColumn) = Global.System.Convert.DBNull
7118         End Sub
7119         
7120         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7121          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7122         Public Function IsKitchenNull() As Boolean
7123             Return Me.IsNull(Me.tableDish.KitchenColumn)
7124         End Function
7125         
7126         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7127          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7128         Public Sub SetKitchenNull()
7129             Me(Me.tableDish.KitchenColumn) = Global.System.Convert.DBNull
7130         End Sub
7131         
7132         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7133          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7134         Public Function IsInventoryTypeNull() As Boolean
7135             Return Me.IsNull(Me.tableDish.InventoryTypeColumn)
7136         End Function
7137         
7138         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7139          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7140         Public Sub SetInventoryTypeNull()
7141             Me(Me.tableDish.InventoryTypeColumn) = Global.System.Convert.DBNull
7142         End Sub
7143         
7144         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7145          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7146         Public Function IsRateNull() As Boolean
7147             Return Me.IsNull(Me.tableDish.RateColumn)
7148         End Function
7149         
7150         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7151          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7152         Public Sub SetRateNull()
7153             Me(Me.tableDish.RateColumn) = Global.System.Convert.DBNull
7154         End Sub
7155         
7156         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7157          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7158         Public Function IsDiscountNull() As Boolean
7159             Return Me.IsNull(Me.tableDish.DiscountColumn)
7160         End Function
7161         
7162         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7163          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7164         Public Sub SetDiscountNull()
7165             Me(Me.tableDish.DiscountColumn) = Global.System.Convert.DBNull
7166         End Sub
7167         
7168         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7169          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7170         Public Function GetKOTGenerationItemsRows() As KOTGenerationItemsRow()
7171             If (Me.Table.ChildRelations("DishKOTGenerationItems") Is Nothing) Then
7172                 Return New KOTGenerationItemsRow(-1) {}
7173             Else
7174                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("DishKOTGenerationItems")),KOTGenerationItemsRow())
7175             End If
7176         End Function
7177         
7178         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7179          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7180         Public Function GetRestaurantBillingItemsRows() As RestaurantBillingItemsRow()
7181             If (Me.Table.ChildRelations("DishRestaurantBillingItems") Is Nothing) Then
7182                 Return New RestaurantBillingItemsRow(-1) {}
7183             Else
7184                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("DishRestaurantBillingItems")),RestaurantBillingItemsRow())
7185             End If
7186         End Function
7187     End Class
7188     
7189     '''<summary>
7190     '''Represents strongly named DataRow class.
7191     '''</summary>
7192     Partial Public Class HotelRow
7193         Inherits Global.System.Data.DataRow
7194         
7195         Private tableHotel As HotelDataTable
7196         
7197         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7198          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7199         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
7200             MyBase.New(rb)
7201             Me.tableHotel = CType(Me.Table,HotelDataTable)
7202         End Sub
7203         
7204         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7205          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7206         Public Property ID() As Integer
7207             Get
7208                 Return CType(Me(Me.tableHotel.IDColumn),Integer)
7209             End Get
7210             Set
7211                 Me(Me.tableHotel.IDColumn) = value
7212             End Set
7213         End Property
7214         
7215         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7216          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7217         Public Property HotelName() As String
7218             Get
7219                 Try
7220                     Return CType(Me(Me.tableHotel.HotelNameColumn),String)
7221                 Catch e As Global.System.InvalidCastException
7222                     Throw New Global.System.Data.StrongTypingException("The value for column 'HotelName' in table 'Hotel' is DBNull.", e)
7223                 End Try
7224             End Get
7225             Set
7226                 Me(Me.tableHotel.HotelNameColumn) = value
7227             End Set
7228         End Property
7229         
7230         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7231          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7232         Public Property AddressLine1() As String
7233             Get
7234                 Try
7235                     Return CType(Me(Me.tableHotel.AddressLine1Column),String)
7236                 Catch e As Global.System.InvalidCastException
7237                     Throw New Global.System.Data.StrongTypingException("The value for column 'AddressLine1' in table 'Hotel' is DBNull.", e)
7238                 End Try
7239             End Get
7240             Set
7241                 Me(Me.tableHotel.AddressLine1Column) = value
7242             End Set
7243         End Property
7244         
7245         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7246          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7247         Public Property AddressLine2() As String
7248             Get
7249                 Try
7250                     Return CType(Me(Me.tableHotel.AddressLine2Column),String)
7251                 Catch e As Global.System.InvalidCastException
7252                     Throw New Global.System.Data.StrongTypingException("The value for column 'AddressLine2' in table 'Hotel' is DBNull.", e)
7253                 End Try
7254             End Get
7255             Set
7256                 Me(Me.tableHotel.AddressLine2Column) = value
7257             End Set
7258         End Property
7259         
7260         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7261          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7262         Public Property AddressLine3() As String
7263             Get
7264                 Try
7265                     Return CType(Me(Me.tableHotel.AddressLine3Column),String)
7266                 Catch e As Global.System.InvalidCastException
7267                     Throw New Global.System.Data.StrongTypingException("The value for column 'AddressLine3' in table 'Hotel' is DBNull.", e)
7268                 End Try
7269             End Get
7270             Set
7271                 Me(Me.tableHotel.AddressLine3Column) = value
7272             End Set
7273         End Property
7274         
7275         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7276          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7277         Public Property ContactNo() As String
7278             Get
7279                 Try
7280                     Return CType(Me(Me.tableHotel.ContactNoColumn),String)
7281                 Catch e As Global.System.InvalidCastException
7282                     Throw New Global.System.Data.StrongTypingException("The value for column 'ContactNo' in table 'Hotel' is DBNull.", e)
7283                 End Try
7284             End Get
7285             Set
7286                 Me(Me.tableHotel.ContactNoColumn) = value
7287             End Set
7288         End Property
7289         
7290         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7291          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7292         Public Property EmailID() As String
7293             Get
7294                 Try
7295                     Return CType(Me(Me.tableHotel.EmailIDColumn),String)
7296                 Catch e As Global.System.InvalidCastException
7297                     Throw New Global.System.Data.StrongTypingException("The value for column 'EmailID' in table 'Hotel' is DBNull.", e)
7298                 End Try
7299             End Get
7300             Set
7301                 Me(Me.tableHotel.EmailIDColumn) = value
7302             End Set
7303         End Property
7304         
7305         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7306          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7307         Public Property TIN() As String
7308             Get
7309                 Try
7310                     Return CType(Me(Me.tableHotel.TINColumn),String)
7311                 Catch e As Global.System.InvalidCastException
7312                     Throw New Global.System.Data.StrongTypingException("The value for column 'TIN' in table 'Hotel' is DBNull.", e)
7313                 End Try
7314             End Get
7315             Set
7316                 Me(Me.tableHotel.TINColumn) = value
7317             End Set
7318         End Property
7319         
7320         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7321          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7322         Public Property STNo() As String
7323             Get
7324                 Try
7325                     Return CType(Me(Me.tableHotel.STNoColumn),String)
7326                 Catch e As Global.System.InvalidCastException
7327                     Throw New Global.System.Data.StrongTypingException("The value for column 'STNo' in table 'Hotel' is DBNull.", e)
7328                 End Try
7329             End Get
7330             Set
7331                 Me(Me.tableHotel.STNoColumn) = value
7332             End Set
7333         End Property
7334         
7335         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7336          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7337         Public Property CIN() As String
7338             Get
7339                 Try
7340                     Return CType(Me(Me.tableHotel.CINColumn),String)
7341                 Catch e As Global.System.InvalidCastException
7342                     Throw New Global.System.Data.StrongTypingException("The value for column 'CIN' in table 'Hotel' is DBNull.", e)
7343                 End Try
7344             End Get
7345             Set
7346                 Me(Me.tableHotel.CINColumn) = value
7347             End Set
7348         End Property
7349         
7350         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7351          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7352         Public Property Logo() As Byte()
7353             Get
7354                 Try
7355                     Return CType(Me(Me.tableHotel.LogoColumn),Byte())
7356                 Catch e As Global.System.InvalidCastException
7357                     Throw New Global.System.Data.StrongTypingException("The value for column 'Logo' in table 'Hotel' is DBNull.", e)
7358                 End Try
7359             End Get
7360             Set
7361                 Me(Me.tableHotel.LogoColumn) = value
7362             End Set
7363         End Property
7364         
7365         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7366          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7367         Public Property BaseCurrency() As String
7368             Get
7369                 Try
7370                     Return CType(Me(Me.tableHotel.BaseCurrencyColumn),String)
7371                 Catch e As Global.System.InvalidCastException
7372                     Throw New Global.System.Data.StrongTypingException("The value for column 'BaseCurrency' in table 'Hotel' is DBNull.", e)
7373                 End Try
7374             End Get
7375             Set
7376                 Me(Me.tableHotel.BaseCurrencyColumn) = value
7377             End Set
7378         End Property
7379         
7380         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7381          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7382         Public Property CurrencyCode() As String
7383             Get
7384                 Try
7385                     Return CType(Me(Me.tableHotel.CurrencyCodeColumn),String)
7386                 Catch e As Global.System.InvalidCastException
7387                     Throw New Global.System.Data.StrongTypingException("The value for column 'CurrencyCode' in table 'Hotel' is DBNull.", e)
7388                 End Try
7389             End Get
7390             Set
7391                 Me(Me.tableHotel.CurrencyCodeColumn) = value
7392             End Set
7393         End Property
7394         
7395         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7396          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7397         Public Property TicketFooterMessage() As String
7398             Get
7399                 Try
7400                     Return CType(Me(Me.tableHotel.TicketFooterMessageColumn),String)
7401                 Catch e As Global.System.InvalidCastException
7402                     Throw New Global.System.Data.StrongTypingException("The value for column 'TicketFooterMessage' in table 'Hotel' is DBNull.", e)
7403                 End Try
7404             End Get
7405             Set
7406                 Me(Me.tableHotel.TicketFooterMessageColumn) = value
7407             End Set
7408         End Property
7409         
7410         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7411          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7412         Public Property StartBillNo() As Short
7413             Get
7414                 Try
7415                     Return CType(Me(Me.tableHotel.StartBillNoColumn),Short)
7416                 Catch e As Global.System.InvalidCastException
7417                     Throw New Global.System.Data.StrongTypingException("The value for column 'StartBillNo' in table 'Hotel' is DBNull.", e)
7418                 End Try
7419             End Get
7420             Set
7421                 Me(Me.tableHotel.StartBillNoColumn) = value
7422             End Set
7423         End Property
7424         
7425         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7426          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7427         Public Function IsHotelNameNull() As Boolean
7428             Return Me.IsNull(Me.tableHotel.HotelNameColumn)
7429         End Function
7430         
7431         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7432          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7433         Public Sub SetHotelNameNull()
7434             Me(Me.tableHotel.HotelNameColumn) = Global.System.Convert.DBNull
7435         End Sub
7436         
7437         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7438          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7439         Public Function IsAddressLine1Null() As Boolean
7440             Return Me.IsNull(Me.tableHotel.AddressLine1Column)
7441         End Function
7442         
7443         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7444          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7445         Public Sub SetAddressLine1Null()
7446             Me(Me.tableHotel.AddressLine1Column) = Global.System.Convert.DBNull
7447         End Sub
7448         
7449         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7450          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7451         Public Function IsAddressLine2Null() As Boolean
7452             Return Me.IsNull(Me.tableHotel.AddressLine2Column)
7453         End Function
7454         
7455         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7456          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7457         Public Sub SetAddressLine2Null()
7458             Me(Me.tableHotel.AddressLine2Column) = Global.System.Convert.DBNull
7459         End Sub
7460         
7461         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7462          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7463         Public Function IsAddressLine3Null() As Boolean
7464             Return Me.IsNull(Me.tableHotel.AddressLine3Column)
7465         End Function
7466         
7467         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7468          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7469         Public Sub SetAddressLine3Null()
7470             Me(Me.tableHotel.AddressLine3Column) = Global.System.Convert.DBNull
7471         End Sub
7472         
7473         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7474          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7475         Public Function IsContactNoNull() As Boolean
7476             Return Me.IsNull(Me.tableHotel.ContactNoColumn)
7477         End Function
7478         
7479         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7480          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7481         Public Sub SetContactNoNull()
7482             Me(Me.tableHotel.ContactNoColumn) = Global.System.Convert.DBNull
7483         End Sub
7484         
7485         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7486          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7487         Public Function IsEmailIDNull() As Boolean
7488             Return Me.IsNull(Me.tableHotel.EmailIDColumn)
7489         End Function
7490         
7491         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7492          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7493         Public Sub SetEmailIDNull()
7494             Me(Me.tableHotel.EmailIDColumn) = Global.System.Convert.DBNull
7495         End Sub
7496         
7497         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7498          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7499         Public Function IsTINNull() As Boolean
7500             Return Me.IsNull(Me.tableHotel.TINColumn)
7501         End Function
7502         
7503         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7504          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7505         Public Sub SetTINNull()
7506             Me(Me.tableHotel.TINColumn) = Global.System.Convert.DBNull
7507         End Sub
7508         
7509         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7510          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7511         Public Function IsSTNoNull() As Boolean
7512             Return Me.IsNull(Me.tableHotel.STNoColumn)
7513         End Function
7514         
7515         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7516          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7517         Public Sub SetSTNoNull()
7518             Me(Me.tableHotel.STNoColumn) = Global.System.Convert.DBNull
7519         End Sub
7520         
7521         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7522          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7523         Public Function IsCINNull() As Boolean
7524             Return Me.IsNull(Me.tableHotel.CINColumn)
7525         End Function
7526         
7527         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7528          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7529         Public Sub SetCINNull()
7530             Me(Me.tableHotel.CINColumn) = Global.System.Convert.DBNull
7531         End Sub
7532         
7533         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7534          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7535         Public Function IsLogoNull() As Boolean
7536             Return Me.IsNull(Me.tableHotel.LogoColumn)
7537         End Function
7538         
7539         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7540          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7541         Public Sub SetLogoNull()
7542             Me(Me.tableHotel.LogoColumn) = Global.System.Convert.DBNull
7543         End Sub
7544         
7545         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7546          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7547         Public Function IsBaseCurrencyNull() As Boolean
7548             Return Me.IsNull(Me.tableHotel.BaseCurrencyColumn)
7549         End Function
7550         
7551         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7552          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7553         Public Sub SetBaseCurrencyNull()
7554             Me(Me.tableHotel.BaseCurrencyColumn) = Global.System.Convert.DBNull
7555         End Sub
7556         
7557         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7558          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7559         Public Function IsCurrencyCodeNull() As Boolean
7560             Return Me.IsNull(Me.tableHotel.CurrencyCodeColumn)
7561         End Function
7562         
7563         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7564          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7565         Public Sub SetCurrencyCodeNull()
7566             Me(Me.tableHotel.CurrencyCodeColumn) = Global.System.Convert.DBNull
7567         End Sub
7568         
7569         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7570          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7571         Public Function IsTicketFooterMessageNull() As Boolean
7572             Return Me.IsNull(Me.tableHotel.TicketFooterMessageColumn)
7573         End Function
7574         
7575         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7576          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7577         Public Sub SetTicketFooterMessageNull()
7578             Me(Me.tableHotel.TicketFooterMessageColumn) = Global.System.Convert.DBNull
7579         End Sub
7580         
7581         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7582          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7583         Public Function IsStartBillNoNull() As Boolean
7584             Return Me.IsNull(Me.tableHotel.StartBillNoColumn)
7585         End Function
7586         
7587         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7588          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7589         Public Sub SetStartBillNoNull()
7590             Me(Me.tableHotel.StartBillNoColumn) = Global.System.Convert.DBNull
7591         End Sub
7592     End Class
7593     
7594     '''<summary>
7595     '''Represents strongly named DataRow class.
7596     '''</summary>
7597     Partial Public Class InventoryTypeRow
7598         Inherits Global.System.Data.DataRow
7599         
7600         Private tableInventoryType As InventoryTypeDataTable
7601         
7602         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7603          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7604         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
7605             MyBase.New(rb)
7606             Me.tableInventoryType = CType(Me.Table,InventoryTypeDataTable)
7607         End Sub
7608         
7609         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7610          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7611         Public Property Type() As String
7612             Get
7613                 Return CType(Me(Me.tableInventoryType.TypeColumn),String)
7614             End Get
7615             Set
7616                 Me(Me.tableInventoryType.TypeColumn) = value
7617             End Set
7618         End Property
7619         
7620         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7621          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7622         Public Function GetDishRows() As DishRow()
7623             If (Me.Table.ChildRelations("InventoryTypeDish") Is Nothing) Then
7624                 Return New DishRow(-1) {}
7625             Else
7626                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("InventoryTypeDish")),DishRow())
7627             End If
7628         End Function
7629         
7630         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7631          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7632         Public Function GetR_TableRows() As R_TableRow()
7633             If (Me.Table.ChildRelations("InventoryTypeR_Table") Is Nothing) Then
7634                 Return New R_TableRow(-1) {}
7635             Else
7636                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("InventoryTypeR_Table")),R_TableRow())
7637             End If
7638         End Function
7639     End Class
7640     
7641     '''<summary>
7642     '''Represents strongly named DataRow class.
7643     '''</summary>
7644     Partial Public Class KitchenRow
7645         Inherits Global.System.Data.DataRow
7646         
7647         Private tableKitchen As KitchenDataTable
7648         
7649         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7650          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7651         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
7652             MyBase.New(rb)
7653             Me.tableKitchen = CType(Me.Table,KitchenDataTable)
7654         End Sub
7655         
7656         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7657          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7658         Public Property KitchenName() As String
7659             Get
7660                 Return CType(Me(Me.tableKitchen.KitchenNameColumn),String)
7661             End Get
7662             Set
7663                 Me(Me.tableKitchen.KitchenNameColumn) = value
7664             End Set
7665         End Property
7666         
7667         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7668          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7669         Public Property Printer() As String
7670             Get
7671                 Try
7672                     Return CType(Me(Me.tableKitchen.PrinterColumn),String)
7673                 Catch e As Global.System.InvalidCastException
7674                     Throw New Global.System.Data.StrongTypingException("The value for column 'Printer' in table 'Kitchen' is DBNull.", e)
7675                 End Try
7676             End Get
7677             Set
7678                 Me(Me.tableKitchen.PrinterColumn) = value
7679             End Set
7680         End Property
7681         
7682         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7683          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7684         Public Property IsEnabled() As String
7685             Get
7686                 Try
7687                     Return CType(Me(Me.tableKitchen.IsEnabledColumn),String)
7688                 Catch e As Global.System.InvalidCastException
7689                     Throw New Global.System.Data.StrongTypingException("The value for column 'IsEnabled' in table 'Kitchen' is DBNull.", e)
7690                 End Try
7691             End Get
7692             Set
7693                 Me(Me.tableKitchen.IsEnabledColumn) = value
7694             End Set
7695         End Property
7696         
7697         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7698          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7699         Public Function IsPrinterNull() As Boolean
7700             Return Me.IsNull(Me.tableKitchen.PrinterColumn)
7701         End Function
7702         
7703         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7704          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7705         Public Sub SetPrinterNull()
7706             Me(Me.tableKitchen.PrinterColumn) = Global.System.Convert.DBNull
7707         End Sub
7708         
7709         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7710          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7711         Public Function IsIsEnabledNull() As Boolean
7712             Return Me.IsNull(Me.tableKitchen.IsEnabledColumn)
7713         End Function
7714         
7715         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7716          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7717         Public Sub SetIsEnabledNull()
7718             Me(Me.tableKitchen.IsEnabledColumn) = Global.System.Convert.DBNull
7719         End Sub
7720         
7721         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7722          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7723         Public Function GetDishRows() As DishRow()
7724             If (Me.Table.ChildRelations("KitchenDish") Is Nothing) Then
7725                 Return New DishRow(-1) {}
7726             Else
7727                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("KitchenDish")),DishRow())
7728             End If
7729         End Function
7730     End Class
7731     
7732     '''<summary>
7733     '''Represents strongly named DataRow class.
7734     '''</summary>
7735     Partial Public Class KOTGenerationRow
7736         Inherits Global.System.Data.DataRow
7737         
7738         Private tableKOTGeneration As KOTGenerationDataTable
7739         
7740         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7741          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7742         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
7743             MyBase.New(rb)
7744             Me.tableKOTGeneration = CType(Me.Table,KOTGenerationDataTable)
7745         End Sub
7746         
7747         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7748          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7749         Public Property TicketID() As Integer
7750             Get
7751                 Return CType(Me(Me.tableKOTGeneration.TicketIDColumn),Integer)
7752             End Get
7753             Set
7754                 Me(Me.tableKOTGeneration.TicketIDColumn) = value
7755             End Set
7756         End Property
7757         
7758         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7759          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7760         Public Property BillDate() As Date
7761             Get
7762                 Try
7763                     Return CType(Me(Me.tableKOTGeneration.BillDateColumn),Date)
7764                 Catch e As Global.System.InvalidCastException
7765                     Throw New Global.System.Data.StrongTypingException("The value for column 'BillDate' in table 'KOTGeneration' is DBNull.", e)
7766                 End Try
7767             End Get
7768             Set
7769                 Me(Me.tableKOTGeneration.BillDateColumn) = value
7770             End Set
7771         End Property
7772         
7773         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7774          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7775         Public Property TableNo() As String
7776             Get
7777                 Try
7778                     Return CType(Me(Me.tableKOTGeneration.TableNoColumn),String)
7779                 Catch e As Global.System.InvalidCastException
7780                     Throw New Global.System.Data.StrongTypingException("The value for column 'TableNo' in table 'KOTGeneration' is DBNull.", e)
7781                 End Try
7782             End Get
7783             Set
7784                 Me(Me.tableKOTGeneration.TableNoColumn) = value
7785             End Set
7786         End Property
7787         
7788         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7789          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7790         Public Property GroupName() As String
7791             Get
7792                 Try
7793                     Return CType(Me(Me.tableKOTGeneration.GroupNameColumn),String)
7794                 Catch e As Global.System.InvalidCastException
7795                     Throw New Global.System.Data.StrongTypingException("The value for column 'GroupName' in table 'KOTGeneration' is DBNull.", e)
7796                 End Try
7797             End Get
7798             Set
7799                 Me(Me.tableKOTGeneration.GroupNameColumn) = value
7800             End Set
7801         End Property
7802         
7803         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7804          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7805         Public Property GrandTotal() As Decimal
7806             Get
7807                 Try
7808                     Return CType(Me(Me.tableKOTGeneration.GrandTotalColumn),Decimal)
7809                 Catch e As Global.System.InvalidCastException
7810                     Throw New Global.System.Data.StrongTypingException("The value for column 'GrandTotal' in table 'KOTGeneration' is DBNull.", e)
7811                 End Try
7812             End Get
7813             Set
7814                 Me(Me.tableKOTGeneration.GrandTotalColumn) = value
7815             End Set
7816         End Property
7817         
7818         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7819          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7820         Public Property OperatorID() As String
7821             Get
7822                 Try
7823                     Return CType(Me(Me.tableKOTGeneration.OperatorIDColumn),String)
7824                 Catch e As Global.System.InvalidCastException
7825                     Throw New Global.System.Data.StrongTypingException("The value for column 'OperatorID' in table 'KOTGeneration' is DBNull.", e)
7826                 End Try
7827             End Get
7828             Set
7829                 Me(Me.tableKOTGeneration.OperatorIDColumn) = value
7830             End Set
7831         End Property
7832         
7833         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7834          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7835         Public Property BillNote() As String
7836             Get
7837                 Try
7838                     Return CType(Me(Me.tableKOTGeneration.BillNoteColumn),String)
7839                 Catch e As Global.System.InvalidCastException
7840                     Throw New Global.System.Data.StrongTypingException("The value for column 'BillNote' in table 'KOTGeneration' is DBNull.", e)
7841                 End Try
7842             End Get
7843             Set
7844                 Me(Me.tableKOTGeneration.BillNoteColumn) = value
7845             End Set
7846         End Property
7847         
7848         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7849          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7850         Public Property Status() As String
7851             Get
7852                 Try
7853                     Return CType(Me(Me.tableKOTGeneration.StatusColumn),String)
7854                 Catch e As Global.System.InvalidCastException
7855                     Throw New Global.System.Data.StrongTypingException("The value for column 'Status' in table 'KOTGeneration' is DBNull.", e)
7856                 End Try
7857             End Get
7858             Set
7859                 Me(Me.tableKOTGeneration.StatusColumn) = value
7860             End Set
7861         End Property
7862         
7863         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7864          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7865         Public Property R_TableRow() As R_TableRow
7866             Get
7867                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("R_TableKOTGeneration")),R_TableRow)
7868             End Get
7869             Set
7870                 Me.SetParentRow(value, Me.Table.ParentRelations("R_TableKOTGeneration"))
7871             End Set
7872         End Property
7873         
7874         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7875          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7876         Public Property RegistrationRow() As RegistrationRow
7877             Get
7878                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("RegistrationKOTGeneration")),RegistrationRow)
7879             End Get
7880             Set
7881                 Me.SetParentRow(value, Me.Table.ParentRelations("RegistrationKOTGeneration"))
7882             End Set
7883         End Property
7884         
7885         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7886          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7887         Public Function IsBillDateNull() As Boolean
7888             Return Me.IsNull(Me.tableKOTGeneration.BillDateColumn)
7889         End Function
7890         
7891         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7892          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7893         Public Sub SetBillDateNull()
7894             Me(Me.tableKOTGeneration.BillDateColumn) = Global.System.Convert.DBNull
7895         End Sub
7896         
7897         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7898          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7899         Public Function IsTableNoNull() As Boolean
7900             Return Me.IsNull(Me.tableKOTGeneration.TableNoColumn)
7901         End Function
7902         
7903         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7904          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7905         Public Sub SetTableNoNull()
7906             Me(Me.tableKOTGeneration.TableNoColumn) = Global.System.Convert.DBNull
7907         End Sub
7908         
7909         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7910          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7911         Public Function IsGroupNameNull() As Boolean
7912             Return Me.IsNull(Me.tableKOTGeneration.GroupNameColumn)
7913         End Function
7914         
7915         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7916          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7917         Public Sub SetGroupNameNull()
7918             Me(Me.tableKOTGeneration.GroupNameColumn) = Global.System.Convert.DBNull
7919         End Sub
7920         
7921         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7922          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7923         Public Function IsGrandTotalNull() As Boolean
7924             Return Me.IsNull(Me.tableKOTGeneration.GrandTotalColumn)
7925         End Function
7926         
7927         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7928          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7929         Public Sub SetGrandTotalNull()
7930             Me(Me.tableKOTGeneration.GrandTotalColumn) = Global.System.Convert.DBNull
7931         End Sub
7932         
7933         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7934          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7935         Public Function IsOperatorIDNull() As Boolean
7936             Return Me.IsNull(Me.tableKOTGeneration.OperatorIDColumn)
7937         End Function
7938         
7939         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7940          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7941         Public Sub SetOperatorIDNull()
7942             Me(Me.tableKOTGeneration.OperatorIDColumn) = Global.System.Convert.DBNull
7943         End Sub
7944         
7945         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7946          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7947         Public Function IsBillNoteNull() As Boolean
7948             Return Me.IsNull(Me.tableKOTGeneration.BillNoteColumn)
7949         End Function
7950         
7951         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7952          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7953         Public Sub SetBillNoteNull()
7954             Me(Me.tableKOTGeneration.BillNoteColumn) = Global.System.Convert.DBNull
7955         End Sub
7956         
7957         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7958          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7959         Public Function IsStatusNull() As Boolean
7960             Return Me.IsNull(Me.tableKOTGeneration.StatusColumn)
7961         End Function
7962         
7963         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7964          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7965         Public Sub SetStatusNull()
7966             Me(Me.tableKOTGeneration.StatusColumn) = Global.System.Convert.DBNull
7967         End Sub
7968         
7969         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7970          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7971         Public Function GetKOTGenerationItemsRows() As KOTGenerationItemsRow()
7972             If (Me.Table.ChildRelations("KOTGenerationKOTGenerationItems") Is Nothing) Then
7973                 Return New KOTGenerationItemsRow(-1) {}
7974             Else
7975                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("KOTGenerationKOTGenerationItems")),KOTGenerationItemsRow())
7976             End If
7977         End Function
7978     End Class
7979     
7980     '''<summary>
7981     '''Represents strongly named DataRow class.
7982     '''</summary>
7983     Partial Public Class KOTGenerationItemsRow
7984         Inherits Global.System.Data.DataRow
7985         
7986         Private tableKOTGenerationItems As KOTGenerationItemsDataTable
7987         
7988         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7989          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7990         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
7991             MyBase.New(rb)
7992             Me.tableKOTGenerationItems = CType(Me.Table,KOTGenerationItemsDataTable)
7993         End Sub
7994         
7995         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
7996          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
7997         Public Property KOT_ID() As Integer
7998             Get
7999                 Return CType(Me(Me.tableKOTGenerationItems.KOT_IDColumn),Integer)
8000             End Get
8001             Set
8002                 Me(Me.tableKOTGenerationItems.KOT_IDColumn) = value
8003             End Set
8004         End Property
8005         
8006         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8007          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8008         Public Property Ticket_ID() As Integer
8009             Get
8010                 Try
8011                     Return CType(Me(Me.tableKOTGenerationItems.Ticket_IDColumn),Integer)
8012                 Catch e As Global.System.InvalidCastException
8013                     Throw New Global.System.Data.StrongTypingException("The value for column 'Ticket_ID' in table 'KOTGenerationItems' is DBNull.", e)
8014                 End Try
8015             End Get
8016             Set
8017                 Me(Me.tableKOTGenerationItems.Ticket_IDColumn) = value
8018             End Set
8019         End Property
8020         
8021         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8022          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8023         Public Property Item_ID() As Integer
8024             Get
8025                 Try
8026                     Return CType(Me(Me.tableKOTGenerationItems.Item_IDColumn),Integer)
8027                 Catch e As Global.System.InvalidCastException
8028                     Throw New Global.System.Data.StrongTypingException("The value for column 'Item_ID' in table 'KOTGenerationItems' is DBNull.", e)
8029                 End Try
8030             End Get
8031             Set
8032                 Me(Me.tableKOTGenerationItems.Item_IDColumn) = value
8033             End Set
8034         End Property
8035         
8036         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8037          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8038         Public Property Qty() As Decimal
8039             Get
8040                 Try
8041                     Return CType(Me(Me.tableKOTGenerationItems.QtyColumn),Decimal)
8042                 Catch e As Global.System.InvalidCastException
8043                     Throw New Global.System.Data.StrongTypingException("The value for column 'Qty' in table 'KOTGenerationItems' is DBNull.", e)
8044                 End Try
8045             End Get
8046             Set
8047                 Me(Me.tableKOTGenerationItems.QtyColumn) = value
8048             End Set
8049         End Property
8050         
8051         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8052          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8053         Public Property Rate() As Decimal
8054             Get
8055                 Try
8056                     Return CType(Me(Me.tableKOTGenerationItems.RateColumn),Decimal)
8057                 Catch e As Global.System.InvalidCastException
8058                     Throw New Global.System.Data.StrongTypingException("The value for column 'Rate' in table 'KOTGenerationItems' is DBNull.", e)
8059                 End Try
8060             End Get
8061             Set
8062                 Me(Me.tableKOTGenerationItems.RateColumn) = value
8063             End Set
8064         End Property
8065         
8066         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8067          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8068         Public Property Amount() As Decimal
8069             Get
8070                 Try
8071                     Return CType(Me(Me.tableKOTGenerationItems.AmountColumn),Decimal)
8072                 Catch e As Global.System.InvalidCastException
8073                     Throw New Global.System.Data.StrongTypingException("The value for column 'Amount' in table 'KOTGenerationItems' is DBNull.", e)
8074                 End Try
8075             End Get
8076             Set
8077                 Me(Me.tableKOTGenerationItems.AmountColumn) = value
8078             End Set
8079         End Property
8080         
8081         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8082          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8083         Public Property DiscPer() As Decimal
8084             Get
8085                 Try
8086                     Return CType(Me(Me.tableKOTGenerationItems.DiscPerColumn),Decimal)
8087                 Catch e As Global.System.InvalidCastException
8088                     Throw New Global.System.Data.StrongTypingException("The value for column 'DiscPer' in table 'KOTGenerationItems' is DBNull.", e)
8089                 End Try
8090             End Get
8091             Set
8092                 Me(Me.tableKOTGenerationItems.DiscPerColumn) = value
8093             End Set
8094         End Property
8095         
8096         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8097          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8098         Public Property Disc() As Decimal
8099             Get
8100                 Try
8101                     Return CType(Me(Me.tableKOTGenerationItems.DiscColumn),Decimal)
8102                 Catch e As Global.System.InvalidCastException
8103                     Throw New Global.System.Data.StrongTypingException("The value for column 'Disc' in table 'KOTGenerationItems' is DBNull.", e)
8104                 End Try
8105             End Get
8106             Set
8107                 Me(Me.tableKOTGenerationItems.DiscColumn) = value
8108             End Set
8109         End Property
8110         
8111         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8112          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8113         Public Property VATPer() As Decimal
8114             Get
8115                 Try
8116                     Return CType(Me(Me.tableKOTGenerationItems.VATPerColumn),Decimal)
8117                 Catch e As Global.System.InvalidCastException
8118                     Throw New Global.System.Data.StrongTypingException("The value for column 'VATPer' in table 'KOTGenerationItems' is DBNull.", e)
8119                 End Try
8120             End Get
8121             Set
8122                 Me(Me.tableKOTGenerationItems.VATPerColumn) = value
8123             End Set
8124         End Property
8125         
8126         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8127          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8128         Public Property VATAmt() As Decimal
8129             Get
8130                 Try
8131                     Return CType(Me(Me.tableKOTGenerationItems.VATAmtColumn),Decimal)
8132                 Catch e As Global.System.InvalidCastException
8133                     Throw New Global.System.Data.StrongTypingException("The value for column 'VATAmt' in table 'KOTGenerationItems' is DBNull.", e)
8134                 End Try
8135             End Get
8136             Set
8137                 Me(Me.tableKOTGenerationItems.VATAmtColumn) = value
8138             End Set
8139         End Property
8140         
8141         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8142          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8143         Public Property STPer() As Decimal
8144             Get
8145                 Try
8146                     Return CType(Me(Me.tableKOTGenerationItems.STPerColumn),Decimal)
8147                 Catch e As Global.System.InvalidCastException
8148                     Throw New Global.System.Data.StrongTypingException("The value for column 'STPer' in table 'KOTGenerationItems' is DBNull.", e)
8149                 End Try
8150             End Get
8151             Set
8152                 Me(Me.tableKOTGenerationItems.STPerColumn) = value
8153             End Set
8154         End Property
8155         
8156         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8157          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8158         Public Property STAmt() As Decimal
8159             Get
8160                 Try
8161                     Return CType(Me(Me.tableKOTGenerationItems.STAmtColumn),Decimal)
8162                 Catch e As Global.System.InvalidCastException
8163                     Throw New Global.System.Data.StrongTypingException("The value for column 'STAmt' in table 'KOTGenerationItems' is DBNull.", e)
8164                 End Try
8165             End Get
8166             Set
8167                 Me(Me.tableKOTGenerationItems.STAmtColumn) = value
8168             End Set
8169         End Property
8170         
8171         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8172          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8173         Public Property SCPer() As Decimal
8174             Get
8175                 Try
8176                     Return CType(Me(Me.tableKOTGenerationItems.SCPerColumn),Decimal)
8177                 Catch e As Global.System.InvalidCastException
8178                     Throw New Global.System.Data.StrongTypingException("The value for column 'SCPer' in table 'KOTGenerationItems' is DBNull.", e)
8179                 End Try
8180             End Get
8181             Set
8182                 Me(Me.tableKOTGenerationItems.SCPerColumn) = value
8183             End Set
8184         End Property
8185         
8186         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8187          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8188         Public Property SCAmt() As Decimal
8189             Get
8190                 Try
8191                     Return CType(Me(Me.tableKOTGenerationItems.SCAmtColumn),Decimal)
8192                 Catch e As Global.System.InvalidCastException
8193                     Throw New Global.System.Data.StrongTypingException("The value for column 'SCAmt' in table 'KOTGenerationItems' is DBNull.", e)
8194                 End Try
8195             End Get
8196             Set
8197                 Me(Me.tableKOTGenerationItems.SCAmtColumn) = value
8198             End Set
8199         End Property
8200         
8201         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8202          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8203         Public Property TotalAmt() As Decimal
8204             Get
8205                 Try
8206                     Return CType(Me(Me.tableKOTGenerationItems.TotalAmtColumn),Decimal)
8207                 Catch e As Global.System.InvalidCastException
8208                     Throw New Global.System.Data.StrongTypingException("The value for column 'TotalAmt' in table 'KOTGenerationItems' is DBNull.", e)
8209                 End Try
8210             End Get
8211             Set
8212                 Me(Me.tableKOTGenerationItems.TotalAmtColumn) = value
8213             End Set
8214         End Property
8215         
8216         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8217          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8218         Public Property ItemNote() As String
8219             Get
8220                 Try
8221                     Return CType(Me(Me.tableKOTGenerationItems.ItemNoteColumn),String)
8222                 Catch e As Global.System.InvalidCastException
8223                     Throw New Global.System.Data.StrongTypingException("The value for column 'ItemNote' in table 'KOTGenerationItems' is DBNull.", e)
8224                 End Try
8225             End Get
8226             Set
8227                 Me(Me.tableKOTGenerationItems.ItemNoteColumn) = value
8228             End Set
8229         End Property
8230         
8231         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8232          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8233         Public Property DishRow() As DishRow
8234             Get
8235                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("DishKOTGenerationItems")),DishRow)
8236             End Get
8237             Set
8238                 Me.SetParentRow(value, Me.Table.ParentRelations("DishKOTGenerationItems"))
8239             End Set
8240         End Property
8241         
8242         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8243          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8244         Public Property KOTGenerationRow() As KOTGenerationRow
8245             Get
8246                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("KOTGenerationKOTGenerationItems")),KOTGenerationRow)
8247             End Get
8248             Set
8249                 Me.SetParentRow(value, Me.Table.ParentRelations("KOTGenerationKOTGenerationItems"))
8250             End Set
8251         End Property
8252         
8253         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8254          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8255         Public Function IsTicket_IDNull() As Boolean
8256             Return Me.IsNull(Me.tableKOTGenerationItems.Ticket_IDColumn)
8257         End Function
8258         
8259         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8260          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8261         Public Sub SetTicket_IDNull()
8262             Me(Me.tableKOTGenerationItems.Ticket_IDColumn) = Global.System.Convert.DBNull
8263         End Sub
8264         
8265         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8266          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8267         Public Function IsItem_IDNull() As Boolean
8268             Return Me.IsNull(Me.tableKOTGenerationItems.Item_IDColumn)
8269         End Function
8270         
8271         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8272          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8273         Public Sub SetItem_IDNull()
8274             Me(Me.tableKOTGenerationItems.Item_IDColumn) = Global.System.Convert.DBNull
8275         End Sub
8276         
8277         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8278          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8279         Public Function IsQtyNull() As Boolean
8280             Return Me.IsNull(Me.tableKOTGenerationItems.QtyColumn)
8281         End Function
8282         
8283         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8284          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8285         Public Sub SetQtyNull()
8286             Me(Me.tableKOTGenerationItems.QtyColumn) = Global.System.Convert.DBNull
8287         End Sub
8288         
8289         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8290          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8291         Public Function IsRateNull() As Boolean
8292             Return Me.IsNull(Me.tableKOTGenerationItems.RateColumn)
8293         End Function
8294         
8295         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8296          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8297         Public Sub SetRateNull()
8298             Me(Me.tableKOTGenerationItems.RateColumn) = Global.System.Convert.DBNull
8299         End Sub
8300         
8301         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8302          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8303         Public Function IsAmountNull() As Boolean
8304             Return Me.IsNull(Me.tableKOTGenerationItems.AmountColumn)
8305         End Function
8306         
8307         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8308          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8309         Public Sub SetAmountNull()
8310             Me(Me.tableKOTGenerationItems.AmountColumn) = Global.System.Convert.DBNull
8311         End Sub
8312         
8313         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8314          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8315         Public Function IsDiscPerNull() As Boolean
8316             Return Me.IsNull(Me.tableKOTGenerationItems.DiscPerColumn)
8317         End Function
8318         
8319         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8320          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8321         Public Sub SetDiscPerNull()
8322             Me(Me.tableKOTGenerationItems.DiscPerColumn) = Global.System.Convert.DBNull
8323         End Sub
8324         
8325         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8326          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8327         Public Function IsDiscNull() As Boolean
8328             Return Me.IsNull(Me.tableKOTGenerationItems.DiscColumn)
8329         End Function
8330         
8331         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8332          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8333         Public Sub SetDiscNull()
8334             Me(Me.tableKOTGenerationItems.DiscColumn) = Global.System.Convert.DBNull
8335         End Sub
8336         
8337         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8338          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8339         Public Function IsVATPerNull() As Boolean
8340             Return Me.IsNull(Me.tableKOTGenerationItems.VATPerColumn)
8341         End Function
8342         
8343         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8344          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8345         Public Sub SetVATPerNull()
8346             Me(Me.tableKOTGenerationItems.VATPerColumn) = Global.System.Convert.DBNull
8347         End Sub
8348         
8349         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8350          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8351         Public Function IsVATAmtNull() As Boolean
8352             Return Me.IsNull(Me.tableKOTGenerationItems.VATAmtColumn)
8353         End Function
8354         
8355         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8356          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8357         Public Sub SetVATAmtNull()
8358             Me(Me.tableKOTGenerationItems.VATAmtColumn) = Global.System.Convert.DBNull
8359         End Sub
8360         
8361         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8362          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8363         Public Function IsSTPerNull() As Boolean
8364             Return Me.IsNull(Me.tableKOTGenerationItems.STPerColumn)
8365         End Function
8366         
8367         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8368          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8369         Public Sub SetSTPerNull()
8370             Me(Me.tableKOTGenerationItems.STPerColumn) = Global.System.Convert.DBNull
8371         End Sub
8372         
8373         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8374          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8375         Public Function IsSTAmtNull() As Boolean
8376             Return Me.IsNull(Me.tableKOTGenerationItems.STAmtColumn)
8377         End Function
8378         
8379         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8380          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8381         Public Sub SetSTAmtNull()
8382             Me(Me.tableKOTGenerationItems.STAmtColumn) = Global.System.Convert.DBNull
8383         End Sub
8384         
8385         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8386          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8387         Public Function IsSCPerNull() As Boolean
8388             Return Me.IsNull(Me.tableKOTGenerationItems.SCPerColumn)
8389         End Function
8390         
8391         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8392          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8393         Public Sub SetSCPerNull()
8394             Me(Me.tableKOTGenerationItems.SCPerColumn) = Global.System.Convert.DBNull
8395         End Sub
8396         
8397         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8398          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8399         Public Function IsSCAmtNull() As Boolean
8400             Return Me.IsNull(Me.tableKOTGenerationItems.SCAmtColumn)
8401         End Function
8402         
8403         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8404          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8405         Public Sub SetSCAmtNull()
8406             Me(Me.tableKOTGenerationItems.SCAmtColumn) = Global.System.Convert.DBNull
8407         End Sub
8408         
8409         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8410          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8411         Public Function IsTotalAmtNull() As Boolean
8412             Return Me.IsNull(Me.tableKOTGenerationItems.TotalAmtColumn)
8413         End Function
8414         
8415         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8416          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8417         Public Sub SetTotalAmtNull()
8418             Me(Me.tableKOTGenerationItems.TotalAmtColumn) = Global.System.Convert.DBNull
8419         End Sub
8420         
8421         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8422          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8423         Public Function IsItemNoteNull() As Boolean
8424             Return Me.IsNull(Me.tableKOTGenerationItems.ItemNoteColumn)
8425         End Function
8426         
8427         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8428          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8429         Public Sub SetItemNoteNull()
8430             Me(Me.tableKOTGenerationItems.ItemNoteColumn) = Global.System.Convert.DBNull
8431         End Sub
8432     End Class
8433     
8434     '''<summary>
8435     '''Represents strongly named DataRow class.
8436     '''</summary>
8437     Partial Public Class LogsRow
8438         Inherits Global.System.Data.DataRow
8439         
8440         Private tableLogs As LogsDataTable
8441         
8442         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8443          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8444         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
8445             MyBase.New(rb)
8446             Me.tableLogs = CType(Me.Table,LogsDataTable)
8447         End Sub
8448         
8449         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8450          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8451         Public Property ID() As Integer
8452             Get
8453                 Return CType(Me(Me.tableLogs.IDColumn),Integer)
8454             End Get
8455             Set
8456                 Me(Me.tableLogs.IDColumn) = value
8457             End Set
8458         End Property
8459         
8460         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8461          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8462         Public Property UserID() As String
8463             Get
8464                 Try
8465                     Return CType(Me(Me.tableLogs.UserIDColumn),String)
8466                 Catch e As Global.System.InvalidCastException
8467                     Throw New Global.System.Data.StrongTypingException("The value for column 'UserID' in table 'Logs' is DBNull.", e)
8468                 End Try
8469             End Get
8470             Set
8471                 Me(Me.tableLogs.UserIDColumn) = value
8472             End Set
8473         End Property
8474         
8475         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8476          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8477         Public Property Operation() As String
8478             Get
8479                 Try
8480                     Return CType(Me(Me.tableLogs.OperationColumn),String)
8481                 Catch e As Global.System.InvalidCastException
8482                     Throw New Global.System.Data.StrongTypingException("The value for column 'Operation' in table 'Logs' is DBNull.", e)
8483                 End Try
8484             End Get
8485             Set
8486                 Me(Me.tableLogs.OperationColumn) = value
8487             End Set
8488         End Property
8489         
8490         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8491          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8492         Public Property _Date() As Date
8493             Get
8494                 Try
8495                     Return CType(Me(Me.tableLogs.DateColumn),Date)
8496                 Catch e As Global.System.InvalidCastException
8497                     Throw New Global.System.Data.StrongTypingException("The value for column 'Date' in table 'Logs' is DBNull.", e)
8498                 End Try
8499             End Get
8500             Set
8501                 Me(Me.tableLogs.DateColumn) = value
8502             End Set
8503         End Property
8504         
8505         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8506          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8507         Public Property RegistrationRow() As RegistrationRow
8508             Get
8509                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("RegistrationLogs")),RegistrationRow)
8510             End Get
8511             Set
8512                 Me.SetParentRow(value, Me.Table.ParentRelations("RegistrationLogs"))
8513             End Set
8514         End Property
8515         
8516         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8517          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8518         Public Function IsUserIDNull() As Boolean
8519             Return Me.IsNull(Me.tableLogs.UserIDColumn)
8520         End Function
8521         
8522         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8523          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8524         Public Sub SetUserIDNull()
8525             Me(Me.tableLogs.UserIDColumn) = Global.System.Convert.DBNull
8526         End Sub
8527         
8528         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8529          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8530         Public Function IsOperationNull() As Boolean
8531             Return Me.IsNull(Me.tableLogs.OperationColumn)
8532         End Function
8533         
8534         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8535          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8536         Public Sub SetOperationNull()
8537             Me(Me.tableLogs.OperationColumn) = Global.System.Convert.DBNull
8538         End Sub
8539         
8540         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8541          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8542         Public Function Is_DateNull() As Boolean
8543             Return Me.IsNull(Me.tableLogs.DateColumn)
8544         End Function
8545         
8546         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8547          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8548         Public Sub Set_DateNull()
8549             Me(Me.tableLogs.DateColumn) = Global.System.Convert.DBNull
8550         End Sub
8551     End Class
8552     
8553     '''<summary>
8554     '''Represents strongly named DataRow class.
8555     '''</summary>
8556     Partial Public Class NotesMasterRow
8557         Inherits Global.System.Data.DataRow
8558         
8559         Private tableNotesMaster As NotesMasterDataTable
8560         
8561         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8562          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8563         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
8564             MyBase.New(rb)
8565             Me.tableNotesMaster = CType(Me.Table,NotesMasterDataTable)
8566         End Sub
8567         
8568         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8569          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8570         Public Property Id() As Integer
8571             Get
8572                 Return CType(Me(Me.tableNotesMaster.IdColumn),Integer)
8573             End Get
8574             Set
8575                 Me(Me.tableNotesMaster.IdColumn) = value
8576             End Set
8577         End Property
8578         
8579         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8580          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8581         Public Property Notes() As String
8582             Get
8583                 Try
8584                     Return CType(Me(Me.tableNotesMaster.NotesColumn),String)
8585                 Catch e As Global.System.InvalidCastException
8586                     Throw New Global.System.Data.StrongTypingException("The value for column 'Notes' in table 'NotesMaster' is DBNull.", e)
8587                 End Try
8588             End Get
8589             Set
8590                 Me(Me.tableNotesMaster.NotesColumn) = value
8591             End Set
8592         End Property
8593         
8594         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8595          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8596         Public Function IsNotesNull() As Boolean
8597             Return Me.IsNull(Me.tableNotesMaster.NotesColumn)
8598         End Function
8599         
8600         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8601          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8602         Public Sub SetNotesNull()
8603             Me(Me.tableNotesMaster.NotesColumn) = Global.System.Convert.DBNull
8604         End Sub
8605     End Class
8606     
8607     '''<summary>
8608     '''Represents strongly named DataRow class.
8609     '''</summary>
8610     Partial Public Class POSGroupingRow
8611         Inherits Global.System.Data.DataRow
8612         
8613         Private tablePOSGrouping As POSGroupingDataTable
8614         
8615         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8616          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8617         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
8618             MyBase.New(rb)
8619             Me.tablePOSGrouping = CType(Me.Table,POSGroupingDataTable)
8620         End Sub
8621         
8622         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8623          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8624         Public Property Id() As Integer
8625             Get
8626                 Return CType(Me(Me.tablePOSGrouping.IdColumn),Integer)
8627             End Get
8628             Set
8629                 Me(Me.tablePOSGrouping.IdColumn) = value
8630             End Set
8631         End Property
8632         
8633         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8634          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8635         Public Property Col1() As Integer
8636             Get
8637                 Try
8638                     Return CType(Me(Me.tablePOSGrouping.Col1Column),Integer)
8639                 Catch e As Global.System.InvalidCastException
8640                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col1' in table 'POSGrouping' is DBNull.", e)
8641                 End Try
8642             End Get
8643             Set
8644                 Me(Me.tablePOSGrouping.Col1Column) = value
8645             End Set
8646         End Property
8647         
8648         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8649          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8650         Public Property Col2() As String
8651             Get
8652                 Try
8653                     Return CType(Me(Me.tablePOSGrouping.Col2Column),String)
8654                 Catch e As Global.System.InvalidCastException
8655                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col2' in table 'POSGrouping' is DBNull.", e)
8656                 End Try
8657             End Get
8658             Set
8659                 Me(Me.tablePOSGrouping.Col2Column) = value
8660             End Set
8661         End Property
8662         
8663         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8664          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8665         Public Property Col3() As Decimal
8666             Get
8667                 Try
8668                     Return CType(Me(Me.tablePOSGrouping.Col3Column),Decimal)
8669                 Catch e As Global.System.InvalidCastException
8670                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col3' in table 'POSGrouping' is DBNull.", e)
8671                 End Try
8672             End Get
8673             Set
8674                 Me(Me.tablePOSGrouping.Col3Column) = value
8675             End Set
8676         End Property
8677         
8678         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8679          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8680         Public Property Col4() As Decimal
8681             Get
8682                 Try
8683                     Return CType(Me(Me.tablePOSGrouping.Col4Column),Decimal)
8684                 Catch e As Global.System.InvalidCastException
8685                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col4' in table 'POSGrouping' is DBNull.", e)
8686                 End Try
8687             End Get
8688             Set
8689                 Me(Me.tablePOSGrouping.Col4Column) = value
8690             End Set
8691         End Property
8692         
8693         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8694          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8695         Public Property Col5() As Decimal
8696             Get
8697                 Try
8698                     Return CType(Me(Me.tablePOSGrouping.Col5Column),Decimal)
8699                 Catch e As Global.System.InvalidCastException
8700                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col5' in table 'POSGrouping' is DBNull.", e)
8701                 End Try
8702             End Get
8703             Set
8704                 Me(Me.tablePOSGrouping.Col5Column) = value
8705             End Set
8706         End Property
8707         
8708         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8709          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8710         Public Property Col6() As Decimal
8711             Get
8712                 Try
8713                     Return CType(Me(Me.tablePOSGrouping.Col6Column),Decimal)
8714                 Catch e As Global.System.InvalidCastException
8715                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col6' in table 'POSGrouping' is DBNull.", e)
8716                 End Try
8717             End Get
8718             Set
8719                 Me(Me.tablePOSGrouping.Col6Column) = value
8720             End Set
8721         End Property
8722         
8723         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8724          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8725         Public Property Col7() As Decimal
8726             Get
8727                 Try
8728                     Return CType(Me(Me.tablePOSGrouping.Col7Column),Decimal)
8729                 Catch e As Global.System.InvalidCastException
8730                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col7' in table 'POSGrouping' is DBNull.", e)
8731                 End Try
8732             End Get
8733             Set
8734                 Me(Me.tablePOSGrouping.Col7Column) = value
8735             End Set
8736         End Property
8737         
8738         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8739          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8740         Public Property Col8() As Decimal
8741             Get
8742                 Try
8743                     Return CType(Me(Me.tablePOSGrouping.Col8Column),Decimal)
8744                 Catch e As Global.System.InvalidCastException
8745                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col8' in table 'POSGrouping' is DBNull.", e)
8746                 End Try
8747             End Get
8748             Set
8749                 Me(Me.tablePOSGrouping.Col8Column) = value
8750             End Set
8751         End Property
8752         
8753         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8754          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8755         Public Property Col9() As Decimal
8756             Get
8757                 Try
8758                     Return CType(Me(Me.tablePOSGrouping.Col9Column),Decimal)
8759                 Catch e As Global.System.InvalidCastException
8760                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col9' in table 'POSGrouping' is DBNull.", e)
8761                 End Try
8762             End Get
8763             Set
8764                 Me(Me.tablePOSGrouping.Col9Column) = value
8765             End Set
8766         End Property
8767         
8768         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8769          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8770         Public Property Col10() As Decimal
8771             Get
8772                 Try
8773                     Return CType(Me(Me.tablePOSGrouping.Col10Column),Decimal)
8774                 Catch e As Global.System.InvalidCastException
8775                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col10' in table 'POSGrouping' is DBNull.", e)
8776                 End Try
8777             End Get
8778             Set
8779                 Me(Me.tablePOSGrouping.Col10Column) = value
8780             End Set
8781         End Property
8782         
8783         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8784          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8785         Public Property Col11() As Decimal
8786             Get
8787                 Try
8788                     Return CType(Me(Me.tablePOSGrouping.Col11Column),Decimal)
8789                 Catch e As Global.System.InvalidCastException
8790                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col11' in table 'POSGrouping' is DBNull.", e)
8791                 End Try
8792             End Get
8793             Set
8794                 Me(Me.tablePOSGrouping.Col11Column) = value
8795             End Set
8796         End Property
8797         
8798         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8799          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8800         Public Property Col12() As Decimal
8801             Get
8802                 Try
8803                     Return CType(Me(Me.tablePOSGrouping.Col12Column),Decimal)
8804                 Catch e As Global.System.InvalidCastException
8805                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col12' in table 'POSGrouping' is DBNull.", e)
8806                 End Try
8807             End Get
8808             Set
8809                 Me(Me.tablePOSGrouping.Col12Column) = value
8810             End Set
8811         End Property
8812         
8813         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8814          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8815         Public Property Col13() As Decimal
8816             Get
8817                 Try
8818                     Return CType(Me(Me.tablePOSGrouping.Col13Column),Decimal)
8819                 Catch e As Global.System.InvalidCastException
8820                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col13' in table 'POSGrouping' is DBNull.", e)
8821                 End Try
8822             End Get
8823             Set
8824                 Me(Me.tablePOSGrouping.Col13Column) = value
8825             End Set
8826         End Property
8827         
8828         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8829          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8830         Public Property Col14() As Decimal
8831             Get
8832                 Try
8833                     Return CType(Me(Me.tablePOSGrouping.Col14Column),Decimal)
8834                 Catch e As Global.System.InvalidCastException
8835                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col14' in table 'POSGrouping' is DBNull.", e)
8836                 End Try
8837             End Get
8838             Set
8839                 Me(Me.tablePOSGrouping.Col14Column) = value
8840             End Set
8841         End Property
8842         
8843         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8844          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8845         Public Property Col15() As String
8846             Get
8847                 Try
8848                     Return CType(Me(Me.tablePOSGrouping.Col15Column),String)
8849                 Catch e As Global.System.InvalidCastException
8850                     Throw New Global.System.Data.StrongTypingException("The value for column 'Col15' in table 'POSGrouping' is DBNull.", e)
8851                 End Try
8852             End Get
8853             Set
8854                 Me(Me.tablePOSGrouping.Col15Column) = value
8855             End Set
8856         End Property
8857         
8858         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8859          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8860         Public Function IsCol1Null() As Boolean
8861             Return Me.IsNull(Me.tablePOSGrouping.Col1Column)
8862         End Function
8863         
8864         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8865          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8866         Public Sub SetCol1Null()
8867             Me(Me.tablePOSGrouping.Col1Column) = Global.System.Convert.DBNull
8868         End Sub
8869         
8870         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8871          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8872         Public Function IsCol2Null() As Boolean
8873             Return Me.IsNull(Me.tablePOSGrouping.Col2Column)
8874         End Function
8875         
8876         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8877          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8878         Public Sub SetCol2Null()
8879             Me(Me.tablePOSGrouping.Col2Column) = Global.System.Convert.DBNull
8880         End Sub
8881         
8882         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8883          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8884         Public Function IsCol3Null() As Boolean
8885             Return Me.IsNull(Me.tablePOSGrouping.Col3Column)
8886         End Function
8887         
8888         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8889          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8890         Public Sub SetCol3Null()
8891             Me(Me.tablePOSGrouping.Col3Column) = Global.System.Convert.DBNull
8892         End Sub
8893         
8894         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8895          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8896         Public Function IsCol4Null() As Boolean
8897             Return Me.IsNull(Me.tablePOSGrouping.Col4Column)
8898         End Function
8899         
8900         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8901          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8902         Public Sub SetCol4Null()
8903             Me(Me.tablePOSGrouping.Col4Column) = Global.System.Convert.DBNull
8904         End Sub
8905         
8906         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8907          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8908         Public Function IsCol5Null() As Boolean
8909             Return Me.IsNull(Me.tablePOSGrouping.Col5Column)
8910         End Function
8911         
8912         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8913          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8914         Public Sub SetCol5Null()
8915             Me(Me.tablePOSGrouping.Col5Column) = Global.System.Convert.DBNull
8916         End Sub
8917         
8918         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8919          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8920         Public Function IsCol6Null() As Boolean
8921             Return Me.IsNull(Me.tablePOSGrouping.Col6Column)
8922         End Function
8923         
8924         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8925          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8926         Public Sub SetCol6Null()
8927             Me(Me.tablePOSGrouping.Col6Column) = Global.System.Convert.DBNull
8928         End Sub
8929         
8930         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8931          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8932         Public Function IsCol7Null() As Boolean
8933             Return Me.IsNull(Me.tablePOSGrouping.Col7Column)
8934         End Function
8935         
8936         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8937          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8938         Public Sub SetCol7Null()
8939             Me(Me.tablePOSGrouping.Col7Column) = Global.System.Convert.DBNull
8940         End Sub
8941         
8942         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8943          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8944         Public Function IsCol8Null() As Boolean
8945             Return Me.IsNull(Me.tablePOSGrouping.Col8Column)
8946         End Function
8947         
8948         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8949          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8950         Public Sub SetCol8Null()
8951             Me(Me.tablePOSGrouping.Col8Column) = Global.System.Convert.DBNull
8952         End Sub
8953         
8954         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8955          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8956         Public Function IsCol9Null() As Boolean
8957             Return Me.IsNull(Me.tablePOSGrouping.Col9Column)
8958         End Function
8959         
8960         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8961          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8962         Public Sub SetCol9Null()
8963             Me(Me.tablePOSGrouping.Col9Column) = Global.System.Convert.DBNull
8964         End Sub
8965         
8966         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8967          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8968         Public Function IsCol10Null() As Boolean
8969             Return Me.IsNull(Me.tablePOSGrouping.Col10Column)
8970         End Function
8971         
8972         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8973          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8974         Public Sub SetCol10Null()
8975             Me(Me.tablePOSGrouping.Col10Column) = Global.System.Convert.DBNull
8976         End Sub
8977         
8978         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8979          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8980         Public Function IsCol11Null() As Boolean
8981             Return Me.IsNull(Me.tablePOSGrouping.Col11Column)
8982         End Function
8983         
8984         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8985          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8986         Public Sub SetCol11Null()
8987             Me(Me.tablePOSGrouping.Col11Column) = Global.System.Convert.DBNull
8988         End Sub
8989         
8990         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8991          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8992         Public Function IsCol12Null() As Boolean
8993             Return Me.IsNull(Me.tablePOSGrouping.Col12Column)
8994         End Function
8995         
8996         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
8997          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
8998         Public Sub SetCol12Null()
8999             Me(Me.tablePOSGrouping.Col12Column) = Global.System.Convert.DBNull
9000         End Sub
9001         
9002         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9003          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9004         Public Function IsCol13Null() As Boolean
9005             Return Me.IsNull(Me.tablePOSGrouping.Col13Column)
9006         End Function
9007         
9008         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9009          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9010         Public Sub SetCol13Null()
9011             Me(Me.tablePOSGrouping.Col13Column) = Global.System.Convert.DBNull
9012         End Sub
9013         
9014         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9015          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9016         Public Function IsCol14Null() As Boolean
9017             Return Me.IsNull(Me.tablePOSGrouping.Col14Column)
9018         End Function
9019         
9020         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9021          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9022         Public Sub SetCol14Null()
9023             Me(Me.tablePOSGrouping.Col14Column) = Global.System.Convert.DBNull
9024         End Sub
9025         
9026         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9027          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9028         Public Function IsCol15Null() As Boolean
9029             Return Me.IsNull(Me.tablePOSGrouping.Col15Column)
9030         End Function
9031         
9032         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9033          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9034         Public Sub SetCol15Null()
9035             Me(Me.tablePOSGrouping.Col15Column) = Global.System.Convert.DBNull
9036         End Sub
9037     End Class
9038     
9039     '''<summary>
9040     '''Represents strongly named DataRow class.
9041     '''</summary>
9042     Partial Public Class POSPrinterSettingRow
9043         Inherits Global.System.Data.DataRow
9044         
9045         Private tablePOSPrinterSetting As POSPrinterSettingDataTable
9046         
9047         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9048          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9049         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
9050             MyBase.New(rb)
9051             Me.tablePOSPrinterSetting = CType(Me.Table,POSPrinterSettingDataTable)
9052         End Sub
9053         
9054         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9055          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9056         Public Property Id() As Integer
9057             Get
9058                 Return CType(Me(Me.tablePOSPrinterSetting.IdColumn),Integer)
9059             End Get
9060             Set
9061                 Me(Me.tablePOSPrinterSetting.IdColumn) = value
9062             End Set
9063         End Property
9064         
9065         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9066          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9067         Public Property PrinterName() As String
9068             Get
9069                 Try
9070                     Return CType(Me(Me.tablePOSPrinterSetting.PrinterNameColumn),String)
9071                 Catch e As Global.System.InvalidCastException
9072                     Throw New Global.System.Data.StrongTypingException("The value for column 'PrinterName' in table 'POSPrinterSetting' is DBNull.", e)
9073                 End Try
9074             End Get
9075             Set
9076                 Me(Me.tablePOSPrinterSetting.PrinterNameColumn) = value
9077             End Set
9078         End Property
9079         
9080         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9081          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9082         Public Property PrinterType() As String
9083             Get
9084                 Try
9085                     Return CType(Me(Me.tablePOSPrinterSetting.PrinterTypeColumn),String)
9086                 Catch e As Global.System.InvalidCastException
9087                     Throw New Global.System.Data.StrongTypingException("The value for column 'PrinterType' in table 'POSPrinterSetting' is DBNull.", e)
9088                 End Try
9089             End Get
9090             Set
9091                 Me(Me.tablePOSPrinterSetting.PrinterTypeColumn) = value
9092             End Set
9093         End Property
9094         
9095         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9096          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9097         Public Property IsEnabled() As String
9098             Get
9099                 Try
9100                     Return CType(Me(Me.tablePOSPrinterSetting.IsEnabledColumn),String)
9101                 Catch e As Global.System.InvalidCastException
9102                     Throw New Global.System.Data.StrongTypingException("The value for column 'IsEnabled' in table 'POSPrinterSetting' is DBNull.", e)
9103                 End Try
9104             End Get
9105             Set
9106                 Me(Me.tablePOSPrinterSetting.IsEnabledColumn) = value
9107             End Set
9108         End Property
9109         
9110         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9111          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9112         Public Function IsPrinterNameNull() As Boolean
9113             Return Me.IsNull(Me.tablePOSPrinterSetting.PrinterNameColumn)
9114         End Function
9115         
9116         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9117          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9118         Public Sub SetPrinterNameNull()
9119             Me(Me.tablePOSPrinterSetting.PrinterNameColumn) = Global.System.Convert.DBNull
9120         End Sub
9121         
9122         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9123          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9124         Public Function IsPrinterTypeNull() As Boolean
9125             Return Me.IsNull(Me.tablePOSPrinterSetting.PrinterTypeColumn)
9126         End Function
9127         
9128         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9129          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9130         Public Sub SetPrinterTypeNull()
9131             Me(Me.tablePOSPrinterSetting.PrinterTypeColumn) = Global.System.Convert.DBNull
9132         End Sub
9133         
9134         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9135          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9136         Public Function IsIsEnabledNull() As Boolean
9137             Return Me.IsNull(Me.tablePOSPrinterSetting.IsEnabledColumn)
9138         End Function
9139         
9140         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9141          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9142         Public Sub SetIsEnabledNull()
9143             Me(Me.tablePOSPrinterSetting.IsEnabledColumn) = Global.System.Convert.DBNull
9144         End Sub
9145     End Class
9146     
9147     '''<summary>
9148     '''Represents strongly named DataRow class.
9149     '''</summary>
9150     Partial Public Class R_TableRow
9151         Inherits Global.System.Data.DataRow
9152         
9153         Private tableR_Table As R_TableDataTable
9154         
9155         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9156          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9157         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
9158             MyBase.New(rb)
9159             Me.tableR_Table = CType(Me.Table,R_TableDataTable)
9160         End Sub
9161         
9162         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9163          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9164         Public Property TableNo() As String
9165             Get
9166                 Return CType(Me(Me.tableR_Table.TableNoColumn),String)
9167             End Get
9168             Set
9169                 Me(Me.tableR_Table.TableNoColumn) = value
9170             End Set
9171         End Property
9172         
9173         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9174          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9175         Public Property Status() As String
9176             Get
9177                 Try
9178                     Return CType(Me(Me.tableR_Table.StatusColumn),String)
9179                 Catch e As Global.System.InvalidCastException
9180                     Throw New Global.System.Data.StrongTypingException("The value for column 'Status' in table 'R_Table' is DBNull.", e)
9181                 End Try
9182             End Get
9183             Set
9184                 Me(Me.tableR_Table.StatusColumn) = value
9185             End Set
9186         End Property
9187         
9188         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9189          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9190         Public Property InventoryType() As String
9191             Get
9192                 Try
9193                     Return CType(Me(Me.tableR_Table.InventoryTypeColumn),String)
9194                 Catch e As Global.System.InvalidCastException
9195                     Throw New Global.System.Data.StrongTypingException("The value for column 'InventoryType' in table 'R_Table' is DBNull.", e)
9196                 End Try
9197             End Get
9198             Set
9199                 Me(Me.tableR_Table.InventoryTypeColumn) = value
9200             End Set
9201         End Property
9202         
9203         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9204          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9205         Public Property InventoryTypeRow() As InventoryTypeRow
9206             Get
9207                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("InventoryTypeR_Table")),InventoryTypeRow)
9208             End Get
9209             Set
9210                 Me.SetParentRow(value, Me.Table.ParentRelations("InventoryTypeR_Table"))
9211             End Set
9212         End Property
9213         
9214         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9215          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9216         Public Function IsStatusNull() As Boolean
9217             Return Me.IsNull(Me.tableR_Table.StatusColumn)
9218         End Function
9219         
9220         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9221          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9222         Public Sub SetStatusNull()
9223             Me(Me.tableR_Table.StatusColumn) = Global.System.Convert.DBNull
9224         End Sub
9225         
9226         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9227          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9228         Public Function IsInventoryTypeNull() As Boolean
9229             Return Me.IsNull(Me.tableR_Table.InventoryTypeColumn)
9230         End Function
9231         
9232         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9233          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9234         Public Sub SetInventoryTypeNull()
9235             Me(Me.tableR_Table.InventoryTypeColumn) = Global.System.Convert.DBNull
9236         End Sub
9237         
9238         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9239          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9240         Public Function GetKOTGenerationRows() As KOTGenerationRow()
9241             If (Me.Table.ChildRelations("R_TableKOTGeneration") Is Nothing) Then
9242                 Return New KOTGenerationRow(-1) {}
9243             Else
9244                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("R_TableKOTGeneration")),KOTGenerationRow())
9245             End If
9246         End Function
9247     End Class
9248     
9249     '''<summary>
9250     '''Represents strongly named DataRow class.
9251     '''</summary>
9252     Partial Public Class RegistrationRow
9253         Inherits Global.System.Data.DataRow
9254         
9255         Private tableRegistration As RegistrationDataTable
9256         
9257         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9258          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9259         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
9260             MyBase.New(rb)
9261             Me.tableRegistration = CType(Me.Table,RegistrationDataTable)
9262         End Sub
9263         
9264         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9265          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9266         Public Property UserID() As String
9267             Get
9268                 Return CType(Me(Me.tableRegistration.UserIDColumn),String)
9269             End Get
9270             Set
9271                 Me(Me.tableRegistration.UserIDColumn) = value
9272             End Set
9273         End Property
9274         
9275         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9276          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9277         Public Property UserType() As String
9278             Get
9279                 Try
9280                     Return CType(Me(Me.tableRegistration.UserTypeColumn),String)
9281                 Catch e As Global.System.InvalidCastException
9282                     Throw New Global.System.Data.StrongTypingException("The value for column 'UserType' in table 'Registration' is DBNull.", e)
9283                 End Try
9284             End Get
9285             Set
9286                 Me(Me.tableRegistration.UserTypeColumn) = value
9287             End Set
9288         End Property
9289         
9290         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9291          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9292         Public Property Password() As String
9293             Get
9294                 Try
9295                     Return CType(Me(Me.tableRegistration.PasswordColumn),String)
9296                 Catch e As Global.System.InvalidCastException
9297                     Throw New Global.System.Data.StrongTypingException("The value for column 'Password' in table 'Registration' is DBNull.", e)
9298                 End Try
9299             End Get
9300             Set
9301                 Me(Me.tableRegistration.PasswordColumn) = value
9302             End Set
9303         End Property
9304         
9305         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9306          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9307         Public Property RegisteredName() As String
9308             Get
9309                 Try
9310                     Return CType(Me(Me.tableRegistration.RegisteredNameColumn),String)
9311                 Catch e As Global.System.InvalidCastException
9312                     Throw New Global.System.Data.StrongTypingException("The value for column 'RegisteredName' in table 'Registration' is DBNull.", e)
9313                 End Try
9314             End Get
9315             Set
9316                 Me(Me.tableRegistration.RegisteredNameColumn) = value
9317             End Set
9318         End Property
9319         
9320         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9321          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9322         Public Property ContactNo() As String
9323             Get
9324                 Try
9325                     Return CType(Me(Me.tableRegistration.ContactNoColumn),String)
9326                 Catch e As Global.System.InvalidCastException
9327                     Throw New Global.System.Data.StrongTypingException("The value for column 'ContactNo' in table 'Registration' is DBNull.", e)
9328                 End Try
9329             End Get
9330             Set
9331                 Me(Me.tableRegistration.ContactNoColumn) = value
9332             End Set
9333         End Property
9334         
9335         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9336          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9337         Public Property EmailID() As String
9338             Get
9339                 Try
9340                     Return CType(Me(Me.tableRegistration.EmailIDColumn),String)
9341                 Catch e As Global.System.InvalidCastException
9342                     Throw New Global.System.Data.StrongTypingException("The value for column 'EmailID' in table 'Registration' is DBNull.", e)
9343                 End Try
9344             End Get
9345             Set
9346                 Me(Me.tableRegistration.EmailIDColumn) = value
9347             End Set
9348         End Property
9349         
9350         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9351          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9352         Public Property JoiningDate() As Date
9353             Get
9354                 Try
9355                     Return CType(Me(Me.tableRegistration.JoiningDateColumn),Date)
9356                 Catch e As Global.System.InvalidCastException
9357                     Throw New Global.System.Data.StrongTypingException("The value for column 'JoiningDate' in table 'Registration' is DBNull.", e)
9358                 End Try
9359             End Get
9360             Set
9361                 Me(Me.tableRegistration.JoiningDateColumn) = value
9362             End Set
9363         End Property
9364         
9365         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9366          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9367         Public Property Active() As String
9368             Get
9369                 Try
9370                     Return CType(Me(Me.tableRegistration.ActiveColumn),String)
9371                 Catch e As Global.System.InvalidCastException
9372                     Throw New Global.System.Data.StrongTypingException("The value for column 'Active' in table 'Registration' is DBNull.", e)
9373                 End Try
9374             End Get
9375             Set
9376                 Me(Me.tableRegistration.ActiveColumn) = value
9377             End Set
9378         End Property
9379         
9380         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9381          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9382         Public Function IsUserTypeNull() As Boolean
9383             Return Me.IsNull(Me.tableRegistration.UserTypeColumn)
9384         End Function
9385         
9386         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9387          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9388         Public Sub SetUserTypeNull()
9389             Me(Me.tableRegistration.UserTypeColumn) = Global.System.Convert.DBNull
9390         End Sub
9391         
9392         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9393          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9394         Public Function IsPasswordNull() As Boolean
9395             Return Me.IsNull(Me.tableRegistration.PasswordColumn)
9396         End Function
9397         
9398         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9399          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9400         Public Sub SetPasswordNull()
9401             Me(Me.tableRegistration.PasswordColumn) = Global.System.Convert.DBNull
9402         End Sub
9403         
9404         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9405          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9406         Public Function IsRegisteredNameNull() As Boolean
9407             Return Me.IsNull(Me.tableRegistration.RegisteredNameColumn)
9408         End Function
9409         
9410         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9411          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9412         Public Sub SetRegisteredNameNull()
9413             Me(Me.tableRegistration.RegisteredNameColumn) = Global.System.Convert.DBNull
9414         End Sub
9415         
9416         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9417          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9418         Public Function IsContactNoNull() As Boolean
9419             Return Me.IsNull(Me.tableRegistration.ContactNoColumn)
9420         End Function
9421         
9422         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9423          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9424         Public Sub SetContactNoNull()
9425             Me(Me.tableRegistration.ContactNoColumn) = Global.System.Convert.DBNull
9426         End Sub
9427         
9428         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9429          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9430         Public Function IsEmailIDNull() As Boolean
9431             Return Me.IsNull(Me.tableRegistration.EmailIDColumn)
9432         End Function
9433         
9434         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9435          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9436         Public Sub SetEmailIDNull()
9437             Me(Me.tableRegistration.EmailIDColumn) = Global.System.Convert.DBNull
9438         End Sub
9439         
9440         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9441          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9442         Public Function IsJoiningDateNull() As Boolean
9443             Return Me.IsNull(Me.tableRegistration.JoiningDateColumn)
9444         End Function
9445         
9446         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9447          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9448         Public Sub SetJoiningDateNull()
9449             Me(Me.tableRegistration.JoiningDateColumn) = Global.System.Convert.DBNull
9450         End Sub
9451         
9452         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9453          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9454         Public Function IsActiveNull() As Boolean
9455             Return Me.IsNull(Me.tableRegistration.ActiveColumn)
9456         End Function
9457         
9458         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9459          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9460         Public Sub SetActiveNull()
9461             Me(Me.tableRegistration.ActiveColumn) = Global.System.Convert.DBNull
9462         End Sub
9463         
9464         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9465          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9466         Public Function GetKOTGenerationRows() As KOTGenerationRow()
9467             If (Me.Table.ChildRelations("RegistrationKOTGeneration") Is Nothing) Then
9468                 Return New KOTGenerationRow(-1) {}
9469             Else
9470                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("RegistrationKOTGeneration")),KOTGenerationRow())
9471             End If
9472         End Function
9473         
9474         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9475          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9476         Public Function GetLogsRows() As LogsRow()
9477             If (Me.Table.ChildRelations("RegistrationLogs") Is Nothing) Then
9478                 Return New LogsRow(-1) {}
9479             Else
9480                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("RegistrationLogs")),LogsRow())
9481             End If
9482         End Function
9483         
9484         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9485          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9486         Public Function GetRestaurantBillingInfoRows() As RestaurantBillingInfoRow()
9487             If (Me.Table.ChildRelations("RegistrationRestaurantBillingInfo") Is Nothing) Then
9488                 Return New RestaurantBillingInfoRow(-1) {}
9489             Else
9490                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("RegistrationRestaurantBillingInfo")),RestaurantBillingInfoRow())
9491             End If
9492         End Function
9493     End Class
9494     
9495     '''<summary>
9496     '''Represents strongly named DataRow class.
9497     '''</summary>
9498     Partial Public Class RestaurantBillingInfoRow
9499         Inherits Global.System.Data.DataRow
9500         
9501         Private tableRestaurantBillingInfo As RestaurantBillingInfoDataTable
9502         
9503         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9504          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9505         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
9506             MyBase.New(rb)
9507             Me.tableRestaurantBillingInfo = CType(Me.Table,RestaurantBillingInfoDataTable)
9508         End Sub
9509         
9510         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9511          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9512         Public Property BillId() As Integer
9513             Get
9514                 Return CType(Me(Me.tableRestaurantBillingInfo.BillIdColumn),Integer)
9515             End Get
9516             Set
9517                 Me(Me.tableRestaurantBillingInfo.BillIdColumn) = value
9518             End Set
9519         End Property
9520         
9521         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9522          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9523         Public Property BillType() As String
9524             Get
9525                 Try
9526                     Return CType(Me(Me.tableRestaurantBillingInfo.BillTypeColumn),String)
9527                 Catch e As Global.System.InvalidCastException
9528                     Throw New Global.System.Data.StrongTypingException("The value for column 'BillType' in table 'RestaurantBillingInfo' is DBNull.", e)
9529                 End Try
9530             End Get
9531             Set
9532                 Me(Me.tableRestaurantBillingInfo.BillTypeColumn) = value
9533             End Set
9534         End Property
9535         
9536         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9537          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9538         Public Property BillDate() As Date
9539             Get
9540                 Try
9541                     Return CType(Me(Me.tableRestaurantBillingInfo.BillDateColumn),Date)
9542                 Catch e As Global.System.InvalidCastException
9543                     Throw New Global.System.Data.StrongTypingException("The value for column 'BillDate' in table 'RestaurantBillingInfo' is DBNull.", e)
9544                 End Try
9545             End Get
9546             Set
9547                 Me(Me.tableRestaurantBillingInfo.BillDateColumn) = value
9548             End Set
9549         End Property
9550         
9551         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9552          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9553         Public Property CustomerName() As String
9554             Get
9555                 Try
9556                     Return CType(Me(Me.tableRestaurantBillingInfo.CustomerNameColumn),String)
9557                 Catch e As Global.System.InvalidCastException
9558                     Throw New Global.System.Data.StrongTypingException("The value for column 'CustomerName' in table 'RestaurantBillingInfo' is DBNull.", e)
9559                 End Try
9560             End Get
9561             Set
9562                 Me(Me.tableRestaurantBillingInfo.CustomerNameColumn) = value
9563             End Set
9564         End Property
9565         
9566         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9567          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9568         Public Property AddressLine1() As String
9569             Get
9570                 Try
9571                     Return CType(Me(Me.tableRestaurantBillingInfo.AddressLine1Column),String)
9572                 Catch e As Global.System.InvalidCastException
9573                     Throw New Global.System.Data.StrongTypingException("The value for column 'AddressLine1' in table 'RestaurantBillingInfo' is DBNull.", e)
9574                 End Try
9575             End Get
9576             Set
9577                 Me(Me.tableRestaurantBillingInfo.AddressLine1Column) = value
9578             End Set
9579         End Property
9580         
9581         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9582          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9583         Public Property AddressLine2() As String
9584             Get
9585                 Try
9586                     Return CType(Me(Me.tableRestaurantBillingInfo.AddressLine2Column),String)
9587                 Catch e As Global.System.InvalidCastException
9588                     Throw New Global.System.Data.StrongTypingException("The value for column 'AddressLine2' in table 'RestaurantBillingInfo' is DBNull.", e)
9589                 End Try
9590             End Get
9591             Set
9592                 Me(Me.tableRestaurantBillingInfo.AddressLine2Column) = value
9593             End Set
9594         End Property
9595         
9596         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9597          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9598         Public Property AddressLine3() As String
9599             Get
9600                 Try
9601                     Return CType(Me(Me.tableRestaurantBillingInfo.AddressLine3Column),String)
9602                 Catch e As Global.System.InvalidCastException
9603                     Throw New Global.System.Data.StrongTypingException("The value for column 'AddressLine3' in table 'RestaurantBillingInfo' is DBNull.", e)
9604                 End Try
9605             End Get
9606             Set
9607                 Me(Me.tableRestaurantBillingInfo.AddressLine3Column) = value
9608             End Set
9609         End Property
9610         
9611         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9612          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9613         Public Property ContactNo() As String
9614             Get
9615                 Try
9616                     Return CType(Me(Me.tableRestaurantBillingInfo.ContactNoColumn),String)
9617                 Catch e As Global.System.InvalidCastException
9618                     Throw New Global.System.Data.StrongTypingException("The value for column 'ContactNo' in table 'RestaurantBillingInfo' is DBNull.", e)
9619                 End Try
9620             End Get
9621             Set
9622                 Me(Me.tableRestaurantBillingInfo.ContactNoColumn) = value
9623             End Set
9624         End Property
9625         
9626         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9627          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9628         Public Property PaymentMode() As String
9629             Get
9630                 Try
9631                     Return CType(Me(Me.tableRestaurantBillingInfo.PaymentModeColumn),String)
9632                 Catch e As Global.System.InvalidCastException
9633                     Throw New Global.System.Data.StrongTypingException("The value for column 'PaymentMode' in table 'RestaurantBillingInfo' is DBNull.", e)
9634                 End Try
9635             End Get
9636             Set
9637                 Me(Me.tableRestaurantBillingInfo.PaymentModeColumn) = value
9638             End Set
9639         End Property
9640         
9641         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9642          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9643         Public Property SubTotal() As Decimal
9644             Get
9645                 Try
9646                     Return CType(Me(Me.tableRestaurantBillingInfo.SubTotalColumn),Decimal)
9647                 Catch e As Global.System.InvalidCastException
9648                     Throw New Global.System.Data.StrongTypingException("The value for column 'SubTotal' in table 'RestaurantBillingInfo' is DBNull.", e)
9649                 End Try
9650             End Get
9651             Set
9652                 Me(Me.tableRestaurantBillingInfo.SubTotalColumn) = value
9653             End Set
9654         End Property
9655         
9656         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9657          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9658         Public Property ItemDiscount() As Decimal
9659             Get
9660                 Try
9661                     Return CType(Me(Me.tableRestaurantBillingInfo.ItemDiscountColumn),Decimal)
9662                 Catch e As Global.System.InvalidCastException
9663                     Throw New Global.System.Data.StrongTypingException("The value for column 'ItemDiscount' in table 'RestaurantBillingInfo' is DBNull.", e)
9664                 End Try
9665             End Get
9666             Set
9667                 Me(Me.tableRestaurantBillingInfo.ItemDiscountColumn) = value
9668             End Set
9669         End Property
9670         
9671         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9672          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9673         Public Property DiscountPer() As Decimal
9674             Get
9675                 Try
9676                     Return CType(Me(Me.tableRestaurantBillingInfo.DiscountPerColumn),Decimal)
9677                 Catch e As Global.System.InvalidCastException
9678                     Throw New Global.System.Data.StrongTypingException("The value for column 'DiscountPer' in table 'RestaurantBillingInfo' is DBNull.", e)
9679                 End Try
9680             End Get
9681             Set
9682                 Me(Me.tableRestaurantBillingInfo.DiscountPerColumn) = value
9683             End Set
9684         End Property
9685         
9686         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9687          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9688         Public Property Discount() As Decimal
9689             Get
9690                 Try
9691                     Return CType(Me(Me.tableRestaurantBillingInfo.DiscountColumn),Decimal)
9692                 Catch e As Global.System.InvalidCastException
9693                     Throw New Global.System.Data.StrongTypingException("The value for column 'Discount' in table 'RestaurantBillingInfo' is DBNull.", e)
9694                 End Try
9695             End Get
9696             Set
9697                 Me(Me.tableRestaurantBillingInfo.DiscountColumn) = value
9698             End Set
9699         End Property
9700         
9701         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9702          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9703         Public Property VAT() As Decimal
9704             Get
9705                 Try
9706                     Return CType(Me(Me.tableRestaurantBillingInfo.VATColumn),Decimal)
9707                 Catch e As Global.System.InvalidCastException
9708                     Throw New Global.System.Data.StrongTypingException("The value for column 'VAT' in table 'RestaurantBillingInfo' is DBNull.", e)
9709                 End Try
9710             End Get
9711             Set
9712                 Me(Me.tableRestaurantBillingInfo.VATColumn) = value
9713             End Set
9714         End Property
9715         
9716         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9717          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9718         Public Property ServiceTax() As Decimal
9719             Get
9720                 Try
9721                     Return CType(Me(Me.tableRestaurantBillingInfo.ServiceTaxColumn),Decimal)
9722                 Catch e As Global.System.InvalidCastException
9723                     Throw New Global.System.Data.StrongTypingException("The value for column 'ServiceTax' in table 'RestaurantBillingInfo' is DBNull.", e)
9724                 End Try
9725             End Get
9726             Set
9727                 Me(Me.tableRestaurantBillingInfo.ServiceTaxColumn) = value
9728             End Set
9729         End Property
9730         
9731         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9732          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9733         Public Property ServiceCharges() As Decimal
9734             Get
9735                 Try
9736                     Return CType(Me(Me.tableRestaurantBillingInfo.ServiceChargesColumn),Decimal)
9737                 Catch e As Global.System.InvalidCastException
9738                     Throw New Global.System.Data.StrongTypingException("The value for column 'ServiceCharges' in table 'RestaurantBillingInfo' is DBNull."& _
9739                             "", e)
9740                 End Try
9741             End Get
9742             Set
9743                 Me(Me.tableRestaurantBillingInfo.ServiceChargesColumn) = value
9744             End Set
9745         End Property
9746         
9747         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9748          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9749         Public Property TACharges() As Decimal
9750             Get
9751                 Try
9752                     Return CType(Me(Me.tableRestaurantBillingInfo.TAChargesColumn),Decimal)
9753                 Catch e As Global.System.InvalidCastException
9754                     Throw New Global.System.Data.StrongTypingException("The value for column 'TACharges' in table 'RestaurantBillingInfo' is DBNull.", e)
9755                 End Try
9756             End Get
9757             Set
9758                 Me(Me.tableRestaurantBillingInfo.TAChargesColumn) = value
9759             End Set
9760         End Property
9761         
9762         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9763          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9764         Public Property HDCharges() As Decimal
9765             Get
9766                 Try
9767                     Return CType(Me(Me.tableRestaurantBillingInfo.HDChargesColumn),Decimal)
9768                 Catch e As Global.System.InvalidCastException
9769                     Throw New Global.System.Data.StrongTypingException("The value for column 'HDCharges' in table 'RestaurantBillingInfo' is DBNull.", e)
9770                 End Try
9771             End Get
9772             Set
9773                 Me(Me.tableRestaurantBillingInfo.HDChargesColumn) = value
9774             End Set
9775         End Property
9776         
9777         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9778          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9779         Public Property GrandTotal() As Decimal
9780             Get
9781                 Try
9782                     Return CType(Me(Me.tableRestaurantBillingInfo.GrandTotalColumn),Decimal)
9783                 Catch e As Global.System.InvalidCastException
9784                     Throw New Global.System.Data.StrongTypingException("The value for column 'GrandTotal' in table 'RestaurantBillingInfo' is DBNull.", e)
9785                 End Try
9786             End Get
9787             Set
9788                 Me(Me.tableRestaurantBillingInfo.GrandTotalColumn) = value
9789             End Set
9790         End Property
9791         
9792         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9793          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9794         Public Property Cash() As Decimal
9795             Get
9796                 Try
9797                     Return CType(Me(Me.tableRestaurantBillingInfo.CashColumn),Decimal)
9798                 Catch e As Global.System.InvalidCastException
9799                     Throw New Global.System.Data.StrongTypingException("The value for column 'Cash' in table 'RestaurantBillingInfo' is DBNull.", e)
9800                 End Try
9801             End Get
9802             Set
9803                 Me(Me.tableRestaurantBillingInfo.CashColumn) = value
9804             End Set
9805         End Property
9806         
9807         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9808          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9809         Public Property Change() As Decimal
9810             Get
9811                 Try
9812                     Return CType(Me(Me.tableRestaurantBillingInfo.ChangeColumn),Decimal)
9813                 Catch e As Global.System.InvalidCastException
9814                     Throw New Global.System.Data.StrongTypingException("The value for column 'Change' in table 'RestaurantBillingInfo' is DBNull.", e)
9815                 End Try
9816             End Get
9817             Set
9818                 Me(Me.tableRestaurantBillingInfo.ChangeColumn) = value
9819             End Set
9820         End Property
9821         
9822         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9823          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9824         Public Property OperatorID() As String
9825             Get
9826                 Try
9827                     Return CType(Me(Me.tableRestaurantBillingInfo.OperatorIDColumn),String)
9828                 Catch e As Global.System.InvalidCastException
9829                     Throw New Global.System.Data.StrongTypingException("The value for column 'OperatorID' in table 'RestaurantBillingInfo' is DBNull.", e)
9830                 End Try
9831             End Get
9832             Set
9833                 Me(Me.tableRestaurantBillingInfo.OperatorIDColumn) = value
9834             End Set
9835         End Property
9836         
9837         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9838          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9839         Public Property BillNote() As String
9840             Get
9841                 Try
9842                     Return CType(Me(Me.tableRestaurantBillingInfo.BillNoteColumn),String)
9843                 Catch e As Global.System.InvalidCastException
9844                     Throw New Global.System.Data.StrongTypingException("The value for column 'BillNote' in table 'RestaurantBillingInfo' is DBNull.", e)
9845                 End Try
9846             End Get
9847             Set
9848                 Me(Me.tableRestaurantBillingInfo.BillNoteColumn) = value
9849             End Set
9850         End Property
9851         
9852         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9853          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9854         Public Property RegistrationRow() As RegistrationRow
9855             Get
9856                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("RegistrationRestaurantBillingInfo")),RegistrationRow)
9857             End Get
9858             Set
9859                 Me.SetParentRow(value, Me.Table.ParentRelations("RegistrationRestaurantBillingInfo"))
9860             End Set
9861         End Property
9862         
9863         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9864          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9865         Public Function IsBillTypeNull() As Boolean
9866             Return Me.IsNull(Me.tableRestaurantBillingInfo.BillTypeColumn)
9867         End Function
9868         
9869         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9870          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9871         Public Sub SetBillTypeNull()
9872             Me(Me.tableRestaurantBillingInfo.BillTypeColumn) = Global.System.Convert.DBNull
9873         End Sub
9874         
9875         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9876          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9877         Public Function IsBillDateNull() As Boolean
9878             Return Me.IsNull(Me.tableRestaurantBillingInfo.BillDateColumn)
9879         End Function
9880         
9881         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9882          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9883         Public Sub SetBillDateNull()
9884             Me(Me.tableRestaurantBillingInfo.BillDateColumn) = Global.System.Convert.DBNull
9885         End Sub
9886         
9887         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9888          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9889         Public Function IsCustomerNameNull() As Boolean
9890             Return Me.IsNull(Me.tableRestaurantBillingInfo.CustomerNameColumn)
9891         End Function
9892         
9893         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9894          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9895         Public Sub SetCustomerNameNull()
9896             Me(Me.tableRestaurantBillingInfo.CustomerNameColumn) = Global.System.Convert.DBNull
9897         End Sub
9898         
9899         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9900          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9901         Public Function IsAddressLine1Null() As Boolean
9902             Return Me.IsNull(Me.tableRestaurantBillingInfo.AddressLine1Column)
9903         End Function
9904         
9905         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9906          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9907         Public Sub SetAddressLine1Null()
9908             Me(Me.tableRestaurantBillingInfo.AddressLine1Column) = Global.System.Convert.DBNull
9909         End Sub
9910         
9911         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9912          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9913         Public Function IsAddressLine2Null() As Boolean
9914             Return Me.IsNull(Me.tableRestaurantBillingInfo.AddressLine2Column)
9915         End Function
9916         
9917         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9918          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9919         Public Sub SetAddressLine2Null()
9920             Me(Me.tableRestaurantBillingInfo.AddressLine2Column) = Global.System.Convert.DBNull
9921         End Sub
9922         
9923         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9924          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9925         Public Function IsAddressLine3Null() As Boolean
9926             Return Me.IsNull(Me.tableRestaurantBillingInfo.AddressLine3Column)
9927         End Function
9928         
9929         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9930          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9931         Public Sub SetAddressLine3Null()
9932             Me(Me.tableRestaurantBillingInfo.AddressLine3Column) = Global.System.Convert.DBNull
9933         End Sub
9934         
9935         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9936          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9937         Public Function IsContactNoNull() As Boolean
9938             Return Me.IsNull(Me.tableRestaurantBillingInfo.ContactNoColumn)
9939         End Function
9940         
9941         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9942          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9943         Public Sub SetContactNoNull()
9944             Me(Me.tableRestaurantBillingInfo.ContactNoColumn) = Global.System.Convert.DBNull
9945         End Sub
9946         
9947         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9948          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9949         Public Function IsPaymentModeNull() As Boolean
9950             Return Me.IsNull(Me.tableRestaurantBillingInfo.PaymentModeColumn)
9951         End Function
9952         
9953         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9954          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9955         Public Sub SetPaymentModeNull()
9956             Me(Me.tableRestaurantBillingInfo.PaymentModeColumn) = Global.System.Convert.DBNull
9957         End Sub
9958         
9959         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9960          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9961         Public Function IsSubTotalNull() As Boolean
9962             Return Me.IsNull(Me.tableRestaurantBillingInfo.SubTotalColumn)
9963         End Function
9964         
9965         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9966          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9967         Public Sub SetSubTotalNull()
9968             Me(Me.tableRestaurantBillingInfo.SubTotalColumn) = Global.System.Convert.DBNull
9969         End Sub
9970         
9971         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9972          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9973         Public Function IsItemDiscountNull() As Boolean
9974             Return Me.IsNull(Me.tableRestaurantBillingInfo.ItemDiscountColumn)
9975         End Function
9976         
9977         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9978          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9979         Public Sub SetItemDiscountNull()
9980             Me(Me.tableRestaurantBillingInfo.ItemDiscountColumn) = Global.System.Convert.DBNull
9981         End Sub
9982         
9983         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9984          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9985         Public Function IsDiscountPerNull() As Boolean
9986             Return Me.IsNull(Me.tableRestaurantBillingInfo.DiscountPerColumn)
9987         End Function
9988         
9989         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9990          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9991         Public Sub SetDiscountPerNull()
9992             Me(Me.tableRestaurantBillingInfo.DiscountPerColumn) = Global.System.Convert.DBNull
9993         End Sub
9994         
9995         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
9996          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
9997         Public Function IsDiscountNull() As Boolean
9998             Return Me.IsNull(Me.tableRestaurantBillingInfo.DiscountColumn)
9999         End Function
10000         
10001         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10002          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10003         Public Sub SetDiscountNull()
10004             Me(Me.tableRestaurantBillingInfo.DiscountColumn) = Global.System.Convert.DBNull
10005         End Sub
10006         
10007         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10008          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10009         Public Function IsVATNull() As Boolean
10010             Return Me.IsNull(Me.tableRestaurantBillingInfo.VATColumn)
10011         End Function
10012         
10013         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10014          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10015         Public Sub SetVATNull()
10016             Me(Me.tableRestaurantBillingInfo.VATColumn) = Global.System.Convert.DBNull
10017         End Sub
10018         
10019         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10020          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10021         Public Function IsServiceTaxNull() As Boolean
10022             Return Me.IsNull(Me.tableRestaurantBillingInfo.ServiceTaxColumn)
10023         End Function
10024         
10025         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10026          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10027         Public Sub SetServiceTaxNull()
10028             Me(Me.tableRestaurantBillingInfo.ServiceTaxColumn) = Global.System.Convert.DBNull
10029         End Sub
10030         
10031         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10032          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10033         Public Function IsServiceChargesNull() As Boolean
10034             Return Me.IsNull(Me.tableRestaurantBillingInfo.ServiceChargesColumn)
10035         End Function
10036         
10037         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10038          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10039         Public Sub SetServiceChargesNull()
10040             Me(Me.tableRestaurantBillingInfo.ServiceChargesColumn) = Global.System.Convert.DBNull
10041         End Sub
10042         
10043         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10044          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10045         Public Function IsTAChargesNull() As Boolean
10046             Return Me.IsNull(Me.tableRestaurantBillingInfo.TAChargesColumn)
10047         End Function
10048         
10049         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10050          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10051         Public Sub SetTAChargesNull()
10052             Me(Me.tableRestaurantBillingInfo.TAChargesColumn) = Global.System.Convert.DBNull
10053         End Sub
10054         
10055         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10056          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10057         Public Function IsHDChargesNull() As Boolean
10058             Return Me.IsNull(Me.tableRestaurantBillingInfo.HDChargesColumn)
10059         End Function
10060         
10061         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10062          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10063         Public Sub SetHDChargesNull()
10064             Me(Me.tableRestaurantBillingInfo.HDChargesColumn) = Global.System.Convert.DBNull
10065         End Sub
10066         
10067         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10068          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10069         Public Function IsGrandTotalNull() As Boolean
10070             Return Me.IsNull(Me.tableRestaurantBillingInfo.GrandTotalColumn)
10071         End Function
10072         
10073         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10074          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10075         Public Sub SetGrandTotalNull()
10076             Me(Me.tableRestaurantBillingInfo.GrandTotalColumn) = Global.System.Convert.DBNull
10077         End Sub
10078         
10079         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10080          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10081         Public Function IsCashNull() As Boolean
10082             Return Me.IsNull(Me.tableRestaurantBillingInfo.CashColumn)
10083         End Function
10084         
10085         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10086          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10087         Public Sub SetCashNull()
10088             Me(Me.tableRestaurantBillingInfo.CashColumn) = Global.System.Convert.DBNull
10089         End Sub
10090         
10091         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10092          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10093         Public Function IsChangeNull() As Boolean
10094             Return Me.IsNull(Me.tableRestaurantBillingInfo.ChangeColumn)
10095         End Function
10096         
10097         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10098          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10099         Public Sub SetChangeNull()
10100             Me(Me.tableRestaurantBillingInfo.ChangeColumn) = Global.System.Convert.DBNull
10101         End Sub
10102         
10103         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10104          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10105         Public Function IsOperatorIDNull() As Boolean
10106             Return Me.IsNull(Me.tableRestaurantBillingInfo.OperatorIDColumn)
10107         End Function
10108         
10109         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10110          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10111         Public Sub SetOperatorIDNull()
10112             Me(Me.tableRestaurantBillingInfo.OperatorIDColumn) = Global.System.Convert.DBNull
10113         End Sub
10114         
10115         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10116          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10117         Public Function IsBillNoteNull() As Boolean
10118             Return Me.IsNull(Me.tableRestaurantBillingInfo.BillNoteColumn)
10119         End Function
10120         
10121         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10122          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10123         Public Sub SetBillNoteNull()
10124             Me(Me.tableRestaurantBillingInfo.BillNoteColumn) = Global.System.Convert.DBNull
10125         End Sub
10126         
10127         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10128          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10129         Public Function GetRestaurantBillingItemsRows() As RestaurantBillingItemsRow()
10130             If (Me.Table.ChildRelations("RestaurantBillingInfoRestaurantBillingItems") Is Nothing) Then
10131                 Return New RestaurantBillingItemsRow(-1) {}
10132             Else
10133                 Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("RestaurantBillingInfoRestaurantBillingItems")),RestaurantBillingItemsRow())
10134             End If
10135         End Function
10136     End Class
10137     
10138     '''<summary>
10139     '''Represents strongly named DataRow class.
10140     '''</summary>
10141     Partial Public Class RestaurantBillingItemsRow
10142         Inherits Global.System.Data.DataRow
10143         
10144         Private tableRestaurantBillingItems As RestaurantBillingItemsDataTable
10145         
10146         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10147          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10148         Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
10149             MyBase.New(rb)
10150             Me.tableRestaurantBillingItems = CType(Me.Table,RestaurantBillingItemsDataTable)
10151         End Sub
10152         
10153         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10154          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10155         Public Property P_ID() As Integer
10156             Get
10157                 Return CType(Me(Me.tableRestaurantBillingItems.P_IDColumn),Integer)
10158             End Get
10159             Set
10160                 Me(Me.tableRestaurantBillingItems.P_IDColumn) = value
10161             End Set
10162         End Property
10163         
10164         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10165          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10166         Public Property B_ID() As Integer
10167             Get
10168                 Try
10169                     Return CType(Me(Me.tableRestaurantBillingItems.B_IDColumn),Integer)
10170                 Catch e As Global.System.InvalidCastException
10171                     Throw New Global.System.Data.StrongTypingException("The value for column 'B_ID' in table 'RestaurantBillingItems' is DBNull.", e)
10172                 End Try
10173             End Get
10174             Set
10175                 Me(Me.tableRestaurantBillingItems.B_IDColumn) = value
10176             End Set
10177         End Property
10178         
10179         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10180          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10181         Public Property Item_ID() As Integer
10182             Get
10183                 Try
10184                     Return CType(Me(Me.tableRestaurantBillingItems.Item_IDColumn),Integer)
10185                 Catch e As Global.System.InvalidCastException
10186                     Throw New Global.System.Data.StrongTypingException("The value for column 'Item_ID' in table 'RestaurantBillingItems' is DBNull.", e)
10187                 End Try
10188             End Get
10189             Set
10190                 Me(Me.tableRestaurantBillingItems.Item_IDColumn) = value
10191             End Set
10192         End Property
10193         
10194         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10195          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10196         Public Property Qty() As Decimal
10197             Get
10198                 Try
10199                     Return CType(Me(Me.tableRestaurantBillingItems.QtyColumn),Decimal)
10200                 Catch e As Global.System.InvalidCastException
10201                     Throw New Global.System.Data.StrongTypingException("The value for column 'Qty' in table 'RestaurantBillingItems' is DBNull.", e)
10202                 End Try
10203             End Get
10204             Set
10205                 Me(Me.tableRestaurantBillingItems.QtyColumn) = value
10206             End Set
10207         End Property
10208         
10209         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10210          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10211         Public Property Rate() As Decimal
10212             Get
10213                 Try
10214                     Return CType(Me(Me.tableRestaurantBillingItems.RateColumn),Decimal)
10215                 Catch e As Global.System.InvalidCastException
10216                     Throw New Global.System.Data.StrongTypingException("The value for column 'Rate' in table 'RestaurantBillingItems' is DBNull.", e)
10217                 End Try
10218             End Get
10219             Set
10220                 Me(Me.tableRestaurantBillingItems.RateColumn) = value
10221             End Set
10222         End Property
10223         
10224         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10225          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10226         Public Property Amount() As Decimal
10227             Get
10228                 Try
10229                     Return CType(Me(Me.tableRestaurantBillingItems.AmountColumn),Decimal)
10230                 Catch e As Global.System.InvalidCastException
10231                     Throw New Global.System.Data.StrongTypingException("The value for column 'Amount' in table 'RestaurantBillingItems' is DBNull.", e)
10232                 End Try
10233             End Get
10234             Set
10235                 Me(Me.tableRestaurantBillingItems.AmountColumn) = value
10236             End Set
10237         End Property
10238         
10239         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10240          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10241         Public Property DiscPer() As Decimal
10242             Get
10243                 Try
10244                     Return CType(Me(Me.tableRestaurantBillingItems.DiscPerColumn),Decimal)
10245                 Catch e As Global.System.InvalidCastException
10246                     Throw New Global.System.Data.StrongTypingException("The value for column 'DiscPer' in table 'RestaurantBillingItems' is DBNull.", e)
10247                 End Try
10248             End Get
10249             Set
10250                 Me(Me.tableRestaurantBillingItems.DiscPerColumn) = value
10251             End Set
10252         End Property
10253         
10254         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10255          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10256         Public Property Disc() As Decimal
10257             Get
10258                 Try
10259                     Return CType(Me(Me.tableRestaurantBillingItems.DiscColumn),Decimal)
10260                 Catch e As Global.System.InvalidCastException
10261                     Throw New Global.System.Data.StrongTypingException("The value for column 'Disc' in table 'RestaurantBillingItems' is DBNull.", e)
10262                 End Try
10263             End Get
10264             Set
10265                 Me(Me.tableRestaurantBillingItems.DiscColumn) = value
10266             End Set
10267         End Property
10268         
10269         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10270          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10271         Public Property VATPer() As Decimal
10272             Get
10273                 Try
10274                     Return CType(Me(Me.tableRestaurantBillingItems.VATPerColumn),Decimal)
10275                 Catch e As Global.System.InvalidCastException
10276                     Throw New Global.System.Data.StrongTypingException("The value for column 'VATPer' in table 'RestaurantBillingItems' is DBNull.", e)
10277                 End Try
10278             End Get
10279             Set
10280                 Me(Me.tableRestaurantBillingItems.VATPerColumn) = value
10281             End Set
10282         End Property
10283         
10284         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10285          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10286         Public Property VATAmt() As Decimal
10287             Get
10288                 Try
10289                     Return CType(Me(Me.tableRestaurantBillingItems.VATAmtColumn),Decimal)
10290                 Catch e As Global.System.InvalidCastException
10291                     Throw New Global.System.Data.StrongTypingException("The value for column 'VATAmt' in table 'RestaurantBillingItems' is DBNull.", e)
10292                 End Try
10293             End Get
10294             Set
10295                 Me(Me.tableRestaurantBillingItems.VATAmtColumn) = value
10296             End Set
10297         End Property
10298         
10299         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10300          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10301         Public Property STPer() As Decimal
10302             Get
10303                 Try
10304                     Return CType(Me(Me.tableRestaurantBillingItems.STPerColumn),Decimal)
10305                 Catch e As Global.System.InvalidCastException
10306                     Throw New Global.System.Data.StrongTypingException("The value for column 'STPer' in table 'RestaurantBillingItems' is DBNull.", e)
10307                 End Try
10308             End Get
10309             Set
10310                 Me(Me.tableRestaurantBillingItems.STPerColumn) = value
10311             End Set
10312         End Property
10313         
10314         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10315          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10316         Public Property STAmt() As Decimal
10317             Get
10318                 Try
10319                     Return CType(Me(Me.tableRestaurantBillingItems.STAmtColumn),Decimal)
10320                 Catch e As Global.System.InvalidCastException
10321                     Throw New Global.System.Data.StrongTypingException("The value for column 'STAmt' in table 'RestaurantBillingItems' is DBNull.", e)
10322                 End Try
10323             End Get
10324             Set
10325                 Me(Me.tableRestaurantBillingItems.STAmtColumn) = value
10326             End Set
10327         End Property
10328         
10329         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10330          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10331         Public Property SCPer() As Decimal
10332             Get
10333                 Try
10334                     Return CType(Me(Me.tableRestaurantBillingItems.SCPerColumn),Decimal)
10335                 Catch e As Global.System.InvalidCastException
10336                     Throw New Global.System.Data.StrongTypingException("The value for column 'SCPer' in table 'RestaurantBillingItems' is DBNull.", e)
10337                 End Try
10338             End Get
10339             Set
10340                 Me(Me.tableRestaurantBillingItems.SCPerColumn) = value
10341             End Set
10342         End Property
10343         
10344         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10345          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10346         Public Property SCAmt() As Decimal
10347             Get
10348                 Try
10349                     Return CType(Me(Me.tableRestaurantBillingItems.SCAmtColumn),Decimal)
10350                 Catch e As Global.System.InvalidCastException
10351                     Throw New Global.System.Data.StrongTypingException("The value for column 'SCAmt' in table 'RestaurantBillingItems' is DBNull.", e)
10352                 End Try
10353             End Get
10354             Set
10355                 Me(Me.tableRestaurantBillingItems.SCAmtColumn) = value
10356             End Set
10357         End Property
10358         
10359         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10360          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10361         Public Property TotalAmt() As Decimal
10362             Get
10363                 Try
10364                     Return CType(Me(Me.tableRestaurantBillingItems.TotalAmtColumn),Decimal)
10365                 Catch e As Global.System.InvalidCastException
10366                     Throw New Global.System.Data.StrongTypingException("The value for column 'TotalAmt' in table 'RestaurantBillingItems' is DBNull.", e)
10367                 End Try
10368             End Get
10369             Set
10370                 Me(Me.tableRestaurantBillingItems.TotalAmtColumn) = value
10371             End Set
10372         End Property
10373         
10374         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10375          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10376         Public Property ItemNote() As String
10377             Get
10378                 Try
10379                     Return CType(Me(Me.tableRestaurantBillingItems.ItemNoteColumn),String)
10380                 Catch e As Global.System.InvalidCastException
10381                     Throw New Global.System.Data.StrongTypingException("The value for column 'ItemNote' in table 'RestaurantBillingItems' is DBNull.", e)
10382                 End Try
10383             End Get
10384             Set
10385                 Me(Me.tableRestaurantBillingItems.ItemNoteColumn) = value
10386             End Set
10387         End Property
10388         
10389         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10390          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10391         Public Property TableNo() As String
10392             Get
10393                 Try
10394                     Return CType(Me(Me.tableRestaurantBillingItems.TableNoColumn),String)
10395                 Catch e As Global.System.InvalidCastException
10396                     Throw New Global.System.Data.StrongTypingException("The value for column 'TableNo' in table 'RestaurantBillingItems' is DBNull.", e)
10397                 End Try
10398             End Get
10399             Set
10400                 Me(Me.tableRestaurantBillingItems.TableNoColumn) = value
10401             End Set
10402         End Property
10403         
10404         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10405          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10406         Public Property GroupName() As String
10407             Get
10408                 Try
10409                     Return CType(Me(Me.tableRestaurantBillingItems.GroupNameColumn),String)
10410                 Catch e As Global.System.InvalidCastException
10411                     Throw New Global.System.Data.StrongTypingException("The value for column 'GroupName' in table 'RestaurantBillingItems' is DBNull.", e)
10412                 End Try
10413             End Get
10414             Set
10415                 Me(Me.tableRestaurantBillingItems.GroupNameColumn) = value
10416             End Set
10417         End Property
10418         
10419         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10420          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10421         Public Property DishRow() As DishRow
10422             Get
10423                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("DishRestaurantBillingItems")),DishRow)
10424             End Get
10425             Set
10426                 Me.SetParentRow(value, Me.Table.ParentRelations("DishRestaurantBillingItems"))
10427             End Set
10428         End Property
10429         
10430         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10431          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10432         Public Property RestaurantBillingInfoRow() As RestaurantBillingInfoRow
10433             Get
10434                 Return CType(Me.GetParentRow(Me.Table.ParentRelations("RestaurantBillingInfoRestaurantBillingItems")),RestaurantBillingInfoRow)
10435             End Get
10436             Set
10437                 Me.SetParentRow(value, Me.Table.ParentRelations("RestaurantBillingInfoRestaurantBillingItems"))
10438             End Set
10439         End Property
10440         
10441         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10442          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10443         Public Function IsB_IDNull() As Boolean
10444             Return Me.IsNull(Me.tableRestaurantBillingItems.B_IDColumn)
10445         End Function
10446         
10447         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10448          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10449         Public Sub SetB_IDNull()
10450             Me(Me.tableRestaurantBillingItems.B_IDColumn) = Global.System.Convert.DBNull
10451         End Sub
10452         
10453         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10454          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10455         Public Function IsItem_IDNull() As Boolean
10456             Return Me.IsNull(Me.tableRestaurantBillingItems.Item_IDColumn)
10457         End Function
10458         
10459         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10460          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10461         Public Sub SetItem_IDNull()
10462             Me(Me.tableRestaurantBillingItems.Item_IDColumn) = Global.System.Convert.DBNull
10463         End Sub
10464         
10465         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10466          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10467         Public Function IsQtyNull() As Boolean
10468             Return Me.IsNull(Me.tableRestaurantBillingItems.QtyColumn)
10469         End Function
10470         
10471         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10472          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10473         Public Sub SetQtyNull()
10474             Me(Me.tableRestaurantBillingItems.QtyColumn) = Global.System.Convert.DBNull
10475         End Sub
10476         
10477         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10478          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10479         Public Function IsRateNull() As Boolean
10480             Return Me.IsNull(Me.tableRestaurantBillingItems.RateColumn)
10481         End Function
10482         
10483         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10484          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10485         Public Sub SetRateNull()
10486             Me(Me.tableRestaurantBillingItems.RateColumn) = Global.System.Convert.DBNull
10487         End Sub
10488         
10489         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10490          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10491         Public Function IsAmountNull() As Boolean
10492             Return Me.IsNull(Me.tableRestaurantBillingItems.AmountColumn)
10493         End Function
10494         
10495         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10496          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10497         Public Sub SetAmountNull()
10498             Me(Me.tableRestaurantBillingItems.AmountColumn) = Global.System.Convert.DBNull
10499         End Sub
10500         
10501         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10502          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10503         Public Function IsDiscPerNull() As Boolean
10504             Return Me.IsNull(Me.tableRestaurantBillingItems.DiscPerColumn)
10505         End Function
10506         
10507         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10508          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10509         Public Sub SetDiscPerNull()
10510             Me(Me.tableRestaurantBillingItems.DiscPerColumn) = Global.System.Convert.DBNull
10511         End Sub
10512         
10513         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10514          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10515         Public Function IsDiscNull() As Boolean
10516             Return Me.IsNull(Me.tableRestaurantBillingItems.DiscColumn)
10517         End Function
10518         
10519         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10520          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10521         Public Sub SetDiscNull()
10522             Me(Me.tableRestaurantBillingItems.DiscColumn) = Global.System.Convert.DBNull
10523         End Sub
10524         
10525         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10526          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10527         Public Function IsVATPerNull() As Boolean
10528             Return Me.IsNull(Me.tableRestaurantBillingItems.VATPerColumn)
10529         End Function
10530         
10531         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10532          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10533         Public Sub SetVATPerNull()
10534             Me(Me.tableRestaurantBillingItems.VATPerColumn) = Global.System.Convert.DBNull
10535         End Sub
10536         
10537         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10538          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10539         Public Function IsVATAmtNull() As Boolean
10540             Return Me.IsNull(Me.tableRestaurantBillingItems.VATAmtColumn)
10541         End Function
10542         
10543         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10544          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10545         Public Sub SetVATAmtNull()
10546             Me(Me.tableRestaurantBillingItems.VATAmtColumn) = Global.System.Convert.DBNull
10547         End Sub
10548         
10549         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10550          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10551         Public Function IsSTPerNull() As Boolean
10552             Return Me.IsNull(Me.tableRestaurantBillingItems.STPerColumn)
10553         End Function
10554         
10555         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10556          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10557         Public Sub SetSTPerNull()
10558             Me(Me.tableRestaurantBillingItems.STPerColumn) = Global.System.Convert.DBNull
10559         End Sub
10560         
10561         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10562          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10563         Public Function IsSTAmtNull() As Boolean
10564             Return Me.IsNull(Me.tableRestaurantBillingItems.STAmtColumn)
10565         End Function
10566         
10567         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10568          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10569         Public Sub SetSTAmtNull()
10570             Me(Me.tableRestaurantBillingItems.STAmtColumn) = Global.System.Convert.DBNull
10571         End Sub
10572         
10573         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10574          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10575         Public Function IsSCPerNull() As Boolean
10576             Return Me.IsNull(Me.tableRestaurantBillingItems.SCPerColumn)
10577         End Function
10578         
10579         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10580          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10581         Public Sub SetSCPerNull()
10582             Me(Me.tableRestaurantBillingItems.SCPerColumn) = Global.System.Convert.DBNull
10583         End Sub
10584         
10585         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10586          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10587         Public Function IsSCAmtNull() As Boolean
10588             Return Me.IsNull(Me.tableRestaurantBillingItems.SCAmtColumn)
10589         End Function
10590         
10591         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10592          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10593         Public Sub SetSCAmtNull()
10594             Me(Me.tableRestaurantBillingItems.SCAmtColumn) = Global.System.Convert.DBNull
10595         End Sub
10596         
10597         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10598          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10599         Public Function IsTotalAmtNull() As Boolean
10600             Return Me.IsNull(Me.tableRestaurantBillingItems.TotalAmtColumn)
10601         End Function
10602         
10603         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10604          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10605         Public Sub SetTotalAmtNull()
10606             Me(Me.tableRestaurantBillingItems.TotalAmtColumn) = Global.System.Convert.DBNull
10607         End Sub
10608         
10609         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10610          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10611         Public Function IsItemNoteNull() As Boolean
10612             Return Me.IsNull(Me.tableRestaurantBillingItems.ItemNoteColumn)
10613         End Function
10614         
10615         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10616          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10617         Public Sub SetItemNoteNull()
10618             Me(Me.tableRestaurantBillingItems.ItemNoteColumn) = Global.System.Convert.DBNull
10619         End Sub
10620         
10621         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10622          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10623         Public Function IsTableNoNull() As Boolean
10624             Return Me.IsNull(Me.tableRestaurantBillingItems.TableNoColumn)
10625         End Function
10626         
10627         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10628          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10629         Public Sub SetTableNoNull()
10630             Me(Me.tableRestaurantBillingItems.TableNoColumn) = Global.System.Convert.DBNull
10631         End Sub
10632         
10633         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10634          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10635         Public Function IsGroupNameNull() As Boolean
10636             Return Me.IsNull(Me.tableRestaurantBillingItems.GroupNameColumn)
10637         End Function
10638         
10639         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10640          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10641         Public Sub SetGroupNameNull()
10642             Me(Me.tableRestaurantBillingItems.GroupNameColumn) = Global.System.Convert.DBNull
10643         End Sub
10644     End Class
10645     
10646     '''<summary>
10647     '''Row event argument class
10648     '''</summary>
10649     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10650     Public Class ActivationRowChangeEvent
10651         Inherits Global.System.EventArgs
10652         
10653         Private eventRow As ActivationRow
10654         
10655         Private eventAction As Global.System.Data.DataRowAction
10656         
10657         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10658          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10659         Public Sub New(ByVal row As ActivationRow, ByVal action As Global.System.Data.DataRowAction)
10660             MyBase.New
10661             Me.eventRow = row
10662             Me.eventAction = action
10663         End Sub
10664         
10665         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10666          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10667         Public ReadOnly Property Row() As ActivationRow
10668             Get
10669                 Return Me.eventRow
10670             End Get
10671         End Property
10672         
10673         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10674          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10675         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
10676             Get
10677                 Return Me.eventAction
10678             End Get
10679         End Property
10680     End Class
10681     
10682     '''<summary>
10683     '''Row event argument class
10684     '''</summary>
10685     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10686     Public Class CategoryRowChangeEvent
10687         Inherits Global.System.EventArgs
10688         
10689         Private eventRow As CategoryRow
10690         
10691         Private eventAction As Global.System.Data.DataRowAction
10692         
10693         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10694          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10695         Public Sub New(ByVal row As CategoryRow, ByVal action As Global.System.Data.DataRowAction)
10696             MyBase.New
10697             Me.eventRow = row
10698             Me.eventAction = action
10699         End Sub
10700         
10701         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10702          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10703         Public ReadOnly Property Row() As CategoryRow
10704             Get
10705                 Return Me.eventRow
10706             End Get
10707         End Property
10708         
10709         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10710          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10711         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
10712             Get
10713                 Return Me.eventAction
10714             End Get
10715         End Property
10716     End Class
10717     
10718     '''<summary>
10719     '''Row event argument class
10720     '''</summary>
10721     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10722     Public Class DishRowChangeEvent
10723         Inherits Global.System.EventArgs
10724         
10725         Private eventRow As DishRow
10726         
10727         Private eventAction As Global.System.Data.DataRowAction
10728         
10729         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10730          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10731         Public Sub New(ByVal row As DishRow, ByVal action As Global.System.Data.DataRowAction)
10732             MyBase.New
10733             Me.eventRow = row
10734             Me.eventAction = action
10735         End Sub
10736         
10737         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10738          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10739         Public ReadOnly Property Row() As DishRow
10740             Get
10741                 Return Me.eventRow
10742             End Get
10743         End Property
10744         
10745         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10746          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10747         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
10748             Get
10749                 Return Me.eventAction
10750             End Get
10751         End Property
10752     End Class
10753     
10754     '''<summary>
10755     '''Row event argument class
10756     '''</summary>
10757     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10758     Public Class HotelRowChangeEvent
10759         Inherits Global.System.EventArgs
10760         
10761         Private eventRow As HotelRow
10762         
10763         Private eventAction As Global.System.Data.DataRowAction
10764         
10765         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10766          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10767         Public Sub New(ByVal row As HotelRow, ByVal action As Global.System.Data.DataRowAction)
10768             MyBase.New
10769             Me.eventRow = row
10770             Me.eventAction = action
10771         End Sub
10772         
10773         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10774          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10775         Public ReadOnly Property Row() As HotelRow
10776             Get
10777                 Return Me.eventRow
10778             End Get
10779         End Property
10780         
10781         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10782          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10783         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
10784             Get
10785                 Return Me.eventAction
10786             End Get
10787         End Property
10788     End Class
10789     
10790     '''<summary>
10791     '''Row event argument class
10792     '''</summary>
10793     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10794     Public Class InventoryTypeRowChangeEvent
10795         Inherits Global.System.EventArgs
10796         
10797         Private eventRow As InventoryTypeRow
10798         
10799         Private eventAction As Global.System.Data.DataRowAction
10800         
10801         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10802          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10803         Public Sub New(ByVal row As InventoryTypeRow, ByVal action As Global.System.Data.DataRowAction)
10804             MyBase.New
10805             Me.eventRow = row
10806             Me.eventAction = action
10807         End Sub
10808         
10809         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10810          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10811         Public ReadOnly Property Row() As InventoryTypeRow
10812             Get
10813                 Return Me.eventRow
10814             End Get
10815         End Property
10816         
10817         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10818          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10819         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
10820             Get
10821                 Return Me.eventAction
10822             End Get
10823         End Property
10824     End Class
10825     
10826     '''<summary>
10827     '''Row event argument class
10828     '''</summary>
10829     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10830     Public Class KitchenRowChangeEvent
10831         Inherits Global.System.EventArgs
10832         
10833         Private eventRow As KitchenRow
10834         
10835         Private eventAction As Global.System.Data.DataRowAction
10836         
10837         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10838          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10839         Public Sub New(ByVal row As KitchenRow, ByVal action As Global.System.Data.DataRowAction)
10840             MyBase.New
10841             Me.eventRow = row
10842             Me.eventAction = action
10843         End Sub
10844         
10845         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10846          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10847         Public ReadOnly Property Row() As KitchenRow
10848             Get
10849                 Return Me.eventRow
10850             End Get
10851         End Property
10852         
10853         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10854          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10855         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
10856             Get
10857                 Return Me.eventAction
10858             End Get
10859         End Property
10860     End Class
10861     
10862     '''<summary>
10863     '''Row event argument class
10864     '''</summary>
10865     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10866     Public Class KOTGenerationRowChangeEvent
10867         Inherits Global.System.EventArgs
10868         
10869         Private eventRow As KOTGenerationRow
10870         
10871         Private eventAction As Global.System.Data.DataRowAction
10872         
10873         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10874          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10875         Public Sub New(ByVal row As KOTGenerationRow, ByVal action As Global.System.Data.DataRowAction)
10876             MyBase.New
10877             Me.eventRow = row
10878             Me.eventAction = action
10879         End Sub
10880         
10881         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10882          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10883         Public ReadOnly Property Row() As KOTGenerationRow
10884             Get
10885                 Return Me.eventRow
10886             End Get
10887         End Property
10888         
10889         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10890          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10891         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
10892             Get
10893                 Return Me.eventAction
10894             End Get
10895         End Property
10896     End Class
10897     
10898     '''<summary>
10899     '''Row event argument class
10900     '''</summary>
10901     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10902     Public Class KOTGenerationItemsRowChangeEvent
10903         Inherits Global.System.EventArgs
10904         
10905         Private eventRow As KOTGenerationItemsRow
10906         
10907         Private eventAction As Global.System.Data.DataRowAction
10908         
10909         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10910          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10911         Public Sub New(ByVal row As KOTGenerationItemsRow, ByVal action As Global.System.Data.DataRowAction)
10912             MyBase.New
10913             Me.eventRow = row
10914             Me.eventAction = action
10915         End Sub
10916         
10917         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10918          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10919         Public ReadOnly Property Row() As KOTGenerationItemsRow
10920             Get
10921                 Return Me.eventRow
10922             End Get
10923         End Property
10924         
10925         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10926          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10927         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
10928             Get
10929                 Return Me.eventAction
10930             End Get
10931         End Property
10932     End Class
10933     
10934     '''<summary>
10935     '''Row event argument class
10936     '''</summary>
10937     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10938     Public Class LogsRowChangeEvent
10939         Inherits Global.System.EventArgs
10940         
10941         Private eventRow As LogsRow
10942         
10943         Private eventAction As Global.System.Data.DataRowAction
10944         
10945         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10946          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10947         Public Sub New(ByVal row As LogsRow, ByVal action As Global.System.Data.DataRowAction)
10948             MyBase.New
10949             Me.eventRow = row
10950             Me.eventAction = action
10951         End Sub
10952         
10953         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10954          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10955         Public ReadOnly Property Row() As LogsRow
10956             Get
10957                 Return Me.eventRow
10958             End Get
10959         End Property
10960         
10961         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10962          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10963         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
10964             Get
10965                 Return Me.eventAction
10966             End Get
10967         End Property
10968     End Class
10969     
10970     '''<summary>
10971     '''Row event argument class
10972     '''</summary>
10973     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10974     Public Class NotesMasterRowChangeEvent
10975         Inherits Global.System.EventArgs
10976         
10977         Private eventRow As NotesMasterRow
10978         
10979         Private eventAction As Global.System.Data.DataRowAction
10980         
10981         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10982          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10983         Public Sub New(ByVal row As NotesMasterRow, ByVal action As Global.System.Data.DataRowAction)
10984             MyBase.New
10985             Me.eventRow = row
10986             Me.eventAction = action
10987         End Sub
10988         
10989         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10990          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10991         Public ReadOnly Property Row() As NotesMasterRow
10992             Get
10993                 Return Me.eventRow
10994             End Get
10995         End Property
10996         
10997         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
10998          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
10999         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
11000             Get
11001                 Return Me.eventAction
11002             End Get
11003         End Property
11004     End Class
11005     
11006     '''<summary>
11007     '''Row event argument class
11008     '''</summary>
11009     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11010     Public Class POSGroupingRowChangeEvent
11011         Inherits Global.System.EventArgs
11012         
11013         Private eventRow As POSGroupingRow
11014         
11015         Private eventAction As Global.System.Data.DataRowAction
11016         
11017         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11018          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11019         Public Sub New(ByVal row As POSGroupingRow, ByVal action As Global.System.Data.DataRowAction)
11020             MyBase.New
11021             Me.eventRow = row
11022             Me.eventAction = action
11023         End Sub
11024         
11025         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11026          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11027         Public ReadOnly Property Row() As POSGroupingRow
11028             Get
11029                 Return Me.eventRow
11030             End Get
11031         End Property
11032         
11033         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11034          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11035         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
11036             Get
11037                 Return Me.eventAction
11038             End Get
11039         End Property
11040     End Class
11041     
11042     '''<summary>
11043     '''Row event argument class
11044     '''</summary>
11045     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11046     Public Class POSPrinterSettingRowChangeEvent
11047         Inherits Global.System.EventArgs
11048         
11049         Private eventRow As POSPrinterSettingRow
11050         
11051         Private eventAction As Global.System.Data.DataRowAction
11052         
11053         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11054          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11055         Public Sub New(ByVal row As POSPrinterSettingRow, ByVal action As Global.System.Data.DataRowAction)
11056             MyBase.New
11057             Me.eventRow = row
11058             Me.eventAction = action
11059         End Sub
11060         
11061         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11062          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11063         Public ReadOnly Property Row() As POSPrinterSettingRow
11064             Get
11065                 Return Me.eventRow
11066             End Get
11067         End Property
11068         
11069         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11070          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11071         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
11072             Get
11073                 Return Me.eventAction
11074             End Get
11075         End Property
11076     End Class
11077     
11078     '''<summary>
11079     '''Row event argument class
11080     '''</summary>
11081     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11082     Public Class R_TableRowChangeEvent
11083         Inherits Global.System.EventArgs
11084         
11085         Private eventRow As R_TableRow
11086         
11087         Private eventAction As Global.System.Data.DataRowAction
11088         
11089         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11090          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11091         Public Sub New(ByVal row As R_TableRow, ByVal action As Global.System.Data.DataRowAction)
11092             MyBase.New
11093             Me.eventRow = row
11094             Me.eventAction = action
11095         End Sub
11096         
11097         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11098          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11099         Public ReadOnly Property Row() As R_TableRow
11100             Get
11101                 Return Me.eventRow
11102             End Get
11103         End Property
11104         
11105         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11106          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11107         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
11108             Get
11109                 Return Me.eventAction
11110             End Get
11111         End Property
11112     End Class
11113     
11114     '''<summary>
11115     '''Row event argument class
11116     '''</summary>
11117     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11118     Public Class RegistrationRowChangeEvent
11119         Inherits Global.System.EventArgs
11120         
11121         Private eventRow As RegistrationRow
11122         
11123         Private eventAction As Global.System.Data.DataRowAction
11124         
11125         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11126          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11127         Public Sub New(ByVal row As RegistrationRow, ByVal action As Global.System.Data.DataRowAction)
11128             MyBase.New
11129             Me.eventRow = row
11130             Me.eventAction = action
11131         End Sub
11132         
11133         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11134          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11135         Public ReadOnly Property Row() As RegistrationRow
11136             Get
11137                 Return Me.eventRow
11138             End Get
11139         End Property
11140         
11141         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11142          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11143         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
11144             Get
11145                 Return Me.eventAction
11146             End Get
11147         End Property
11148     End Class
11149     
11150     '''<summary>
11151     '''Row event argument class
11152     '''</summary>
11153     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11154     Public Class RestaurantBillingInfoRowChangeEvent
11155         Inherits Global.System.EventArgs
11156         
11157         Private eventRow As RestaurantBillingInfoRow
11158         
11159         Private eventAction As Global.System.Data.DataRowAction
11160         
11161         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11162          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11163         Public Sub New(ByVal row As RestaurantBillingInfoRow, ByVal action As Global.System.Data.DataRowAction)
11164             MyBase.New
11165             Me.eventRow = row
11166             Me.eventAction = action
11167         End Sub
11168         
11169         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11170          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11171         Public ReadOnly Property Row() As RestaurantBillingInfoRow
11172             Get
11173                 Return Me.eventRow
11174             End Get
11175         End Property
11176         
11177         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11178          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11179         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
11180             Get
11181                 Return Me.eventAction
11182             End Get
11183         End Property
11184     End Class
11185     
11186     '''<summary>
11187     '''Row event argument class
11188     '''</summary>
11189     <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11190     Public Class RestaurantBillingItemsRowChangeEvent
11191         Inherits Global.System.EventArgs
11192         
11193         Private eventRow As RestaurantBillingItemsRow
11194         
11195         Private eventAction As Global.System.Data.DataRowAction
11196         
11197         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11198          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11199         Public Sub New(ByVal row As RestaurantBillingItemsRow, ByVal action As Global.System.Data.DataRowAction)
11200             MyBase.New
11201             Me.eventRow = row
11202             Me.eventAction = action
11203         End Sub
11204         
11205         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11206          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11207         Public ReadOnly Property Row() As RestaurantBillingItemsRow
11208             Get
11209                 Return Me.eventRow
11210             End Get
11211         End Property
11212         
11213         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11214          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11215         Public ReadOnly Property Action() As Global.System.Data.DataRowAction
11216             Get
11217                 Return Me.eventAction
11218             End Get
11219         End Property
11220     End Class
11221 End Class
11222
11223 Namespace RPOS_DBDataSetTableAdapters
11224     
11225     '''<summary>
11226     '''Represents the connection and commands used to retrieve and save data.
11227     '''</summary>
11228     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
11229      Global.System.ComponentModel.ToolboxItem(true), _
11230      Global.System.ComponentModel.DataObjectAttribute(true), _
11231      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
11232         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
11233      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
11234     Partial Public Class ActivationTableAdapter
11235         Inherits Global.System.ComponentModel.Component
11236         
11237         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
11238         
11239         Private _connection As Global.System.Data.OleDb.OleDbConnection
11240         
11241         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
11242         
11243         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
11244         
11245         Private _clearBeforeFill As Boolean
11246         
11247         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11248          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11249         Public Sub New()
11250             MyBase.New
11251             Me.ClearBeforeFill = true
11252         End Sub
11253         
11254         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11255          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11256         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
11257             Get
11258                 If (Me._adapter Is Nothing) Then
11259                     Me.InitAdapter
11260                 End If
11261                 Return Me._adapter
11262             End Get
11263         End Property
11264         
11265         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11266          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11267         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
11268             Get
11269                 If (Me._connection Is Nothing) Then
11270                     Me.InitConnection
11271                 End If
11272                 Return Me._connection
11273             End Get
11274             Set
11275                 Me._connection = value
11276                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
11277                     Me.Adapter.InsertCommand.Connection = value
11278                 End If
11279                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
11280                     Me.Adapter.DeleteCommand.Connection = value
11281                 End If
11282                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
11283                     Me.Adapter.UpdateCommand.Connection = value
11284                 End If
11285                 Dim i As Integer = 0
11286                 Do While (i < Me.CommandCollection.Length)
11287                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
11288                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
11289                     End If
11290                     i = (i + 1)
11291                 Loop
11292             End Set
11293         End Property
11294         
11295         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11296          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11297         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
11298             Get
11299                 Return Me._transaction
11300             End Get
11301             Set
11302                 Me._transaction = value
11303                 Dim i As Integer = 0
11304                 Do While (i < Me.CommandCollection.Length)
11305                     Me.CommandCollection(i).Transaction = Me._transaction
11306                     i = (i + 1)
11307                 Loop
11308                 If ((Not (Me.Adapter) Is Nothing) _
11309                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
11310                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
11311                 End If
11312                 If ((Not (Me.Adapter) Is Nothing) _
11313                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
11314                     Me.Adapter.InsertCommand.Transaction = Me._transaction
11315                 End If
11316                 If ((Not (Me.Adapter) Is Nothing) _
11317                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
11318                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
11319                 End If
11320             End Set
11321         End Property
11322         
11323         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11324          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11325         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
11326             Get
11327                 If (Me._commandCollection Is Nothing) Then
11328                     Me.InitCommandCollection
11329                 End If
11330                 Return Me._commandCollection
11331             End Get
11332         End Property
11333         
11334         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11335          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11336         Public Property ClearBeforeFill() As Boolean
11337             Get
11338                 Return Me._clearBeforeFill
11339             End Get
11340             Set
11341                 Me._clearBeforeFill = value
11342             End Set
11343         End Property
11344         
11345         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11346          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11347         Private Sub InitAdapter()
11348             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
11349             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
11350             tableMapping.SourceTable = "Table"
11351             tableMapping.DataSetTable = "Activation"
11352             tableMapping.ColumnMappings.Add("Id", "Id")
11353             tableMapping.ColumnMappings.Add("HardwareID", "HardwareID")
11354             tableMapping.ColumnMappings.Add("ActivationID", "ActivationID")
11355             Me._adapter.TableMappings.Add(tableMapping)
11356             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
11357             Me._adapter.DeleteCommand.Connection = Me.Connection
11358             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `Activation` WHERE ((`Id` = ?) AND ((? = 1 AND `HardwareID` IS NULL) "& _
11359                 "OR (`HardwareID` = ?)) AND ((? = 1 AND `ActivationID` IS NULL) OR (`ActivationID"& _
11360                 "` = ?)))"
11361             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
11362             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Id", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Id", Global.System.Data.DataRowVersion.Original, false, Nothing))
11363             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_HardwareID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HardwareID", Global.System.Data.DataRowVersion.Original, true, Nothing))
11364             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_HardwareID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HardwareID", Global.System.Data.DataRowVersion.Original, false, Nothing))
11365             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ActivationID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ActivationID", Global.System.Data.DataRowVersion.Original, true, Nothing))
11366             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ActivationID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ActivationID", Global.System.Data.DataRowVersion.Original, false, Nothing))
11367             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
11368             Me._adapter.InsertCommand.Connection = Me.Connection
11369             Me._adapter.InsertCommand.CommandText = "INSERT INTO `Activation` (`HardwareID`, `ActivationID`) VALUES (?, ?)"
11370             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
11371             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("HardwareID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HardwareID", Global.System.Data.DataRowVersion.Current, false, Nothing))
11372             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ActivationID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ActivationID", Global.System.Data.DataRowVersion.Current, false, Nothing))
11373             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
11374             Me._adapter.UpdateCommand.Connection = Me.Connection
11375             Me._adapter.UpdateCommand.CommandText = "UPDATE `Activation` SET `HardwareID` = ?, `ActivationID` = ? WHERE ((`Id` = ?) AN"& _
11376                 "D ((? = 1 AND `HardwareID` IS NULL) OR (`HardwareID` = ?)) AND ((? = 1 AND `Acti"& _
11377                 "vationID` IS NULL) OR (`ActivationID` = ?)))"
11378             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
11379             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("HardwareID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HardwareID", Global.System.Data.DataRowVersion.Current, false, Nothing))
11380             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ActivationID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ActivationID", Global.System.Data.DataRowVersion.Current, false, Nothing))
11381             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Id", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Id", Global.System.Data.DataRowVersion.Original, false, Nothing))
11382             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_HardwareID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HardwareID", Global.System.Data.DataRowVersion.Original, true, Nothing))
11383             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_HardwareID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HardwareID", Global.System.Data.DataRowVersion.Original, false, Nothing))
11384             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ActivationID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ActivationID", Global.System.Data.DataRowVersion.Original, true, Nothing))
11385             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ActivationID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ActivationID", Global.System.Data.DataRowVersion.Original, false, Nothing))
11386         End Sub
11387         
11388         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11389          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11390         Private Sub InitConnection()
11391             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
11392             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
11393         End Sub
11394         
11395         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11396          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11397         Private Sub InitCommandCollection()
11398             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
11399             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
11400             Me._commandCollection(0).Connection = Me.Connection
11401             Me._commandCollection(0).CommandText = "SELECT Id, HardwareID, ActivationID FROM Activation"
11402             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
11403         End Sub
11404         
11405         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11406          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11407          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
11408          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
11409         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.ActivationDataTable) As Integer
11410             Me.Adapter.SelectCommand = Me.CommandCollection(0)
11411             If (Me.ClearBeforeFill = true) Then
11412                 dataTable.Clear
11413             End If
11414             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
11415             Return returnValue
11416         End Function
11417         
11418         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11419          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11420          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
11421          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
11422         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.ActivationDataTable
11423             Me.Adapter.SelectCommand = Me.CommandCollection(0)
11424             Dim dataTable As RPOS_DBDataSet.ActivationDataTable = New RPOS_DBDataSet.ActivationDataTable()
11425             Me.Adapter.Fill(dataTable)
11426             Return dataTable
11427         End Function
11428         
11429         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11430          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11431          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
11432         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.ActivationDataTable) As Integer
11433             Return Me.Adapter.Update(dataTable)
11434         End Function
11435         
11436         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11437          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11438          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
11439         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
11440             Return Me.Adapter.Update(dataSet, "Activation")
11441         End Function
11442         
11443         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11444          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11445          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
11446         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
11447             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
11448         End Function
11449         
11450         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11451          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11452          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
11453         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
11454             Return Me.Adapter.Update(dataRows)
11455         End Function
11456         
11457         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11458          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11459          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
11460          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
11461         Public Overloads Overridable Function Delete(ByVal Original_Id As Integer, ByVal Original_HardwareID As String, ByVal Original_ActivationID As String) As Integer
11462             Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_Id,Integer)
11463             If (Original_HardwareID Is Nothing) Then
11464                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
11465                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
11466             Else
11467                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
11468                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_HardwareID,String)
11469             End If
11470             If (Original_ActivationID Is Nothing) Then
11471                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
11472                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
11473             Else
11474                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
11475                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_ActivationID,String)
11476             End If
11477             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
11478             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
11479                         <> Global.System.Data.ConnectionState.Open) Then
11480                 Me.Adapter.DeleteCommand.Connection.Open
11481             End If
11482             Try
11483                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
11484                 Return returnValue
11485             Finally
11486                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
11487                     Me.Adapter.DeleteCommand.Connection.Close
11488                 End If
11489             End Try
11490         End Function
11491         
11492         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11493          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11494          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
11495          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
11496         Public Overloads Overridable Function Insert(ByVal HardwareID As String, ByVal ActivationID As String) As Integer
11497             If (HardwareID Is Nothing) Then
11498                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
11499             Else
11500                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(HardwareID,String)
11501             End If
11502             If (ActivationID Is Nothing) Then
11503                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
11504             Else
11505                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(ActivationID,String)
11506             End If
11507             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
11508             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
11509                         <> Global.System.Data.ConnectionState.Open) Then
11510                 Me.Adapter.InsertCommand.Connection.Open
11511             End If
11512             Try
11513                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
11514                 Return returnValue
11515             Finally
11516                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
11517                     Me.Adapter.InsertCommand.Connection.Close
11518                 End If
11519             End Try
11520         End Function
11521         
11522         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11523          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11524          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
11525          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
11526         Public Overloads Overridable Function Update(ByVal HardwareID As String, ByVal ActivationID As String, ByVal Original_Id As Integer, ByVal Original_HardwareID As String, ByVal Original_ActivationID As String) As Integer
11527             If (HardwareID Is Nothing) Then
11528                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
11529             Else
11530                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(HardwareID,String)
11531             End If
11532             If (ActivationID Is Nothing) Then
11533                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
11534             Else
11535                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(ActivationID,String)
11536             End If
11537             Me.Adapter.UpdateCommand.Parameters(2).Value = CType(Original_Id,Integer)
11538             If (Original_HardwareID Is Nothing) Then
11539                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(1,Object)
11540                 Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
11541             Else
11542                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(0,Object)
11543                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(Original_HardwareID,String)
11544             End If
11545             If (Original_ActivationID Is Nothing) Then
11546                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(1,Object)
11547                 Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
11548             Else
11549                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(0,Object)
11550                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(Original_ActivationID,String)
11551             End If
11552             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
11553             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
11554                         <> Global.System.Data.ConnectionState.Open) Then
11555                 Me.Adapter.UpdateCommand.Connection.Open
11556             End If
11557             Try
11558                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
11559                 Return returnValue
11560             Finally
11561                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
11562                     Me.Adapter.UpdateCommand.Connection.Close
11563                 End If
11564             End Try
11565         End Function
11566     End Class
11567     
11568     '''<summary>
11569     '''Represents the connection and commands used to retrieve and save data.
11570     '''</summary>
11571     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
11572      Global.System.ComponentModel.ToolboxItem(true), _
11573      Global.System.ComponentModel.DataObjectAttribute(true), _
11574      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
11575         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
11576      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
11577     Partial Public Class CategoryTableAdapter
11578         Inherits Global.System.ComponentModel.Component
11579         
11580         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
11581         
11582         Private _connection As Global.System.Data.OleDb.OleDbConnection
11583         
11584         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
11585         
11586         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
11587         
11588         Private _clearBeforeFill As Boolean
11589         
11590         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11591          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11592         Public Sub New()
11593             MyBase.New
11594             Me.ClearBeforeFill = true
11595         End Sub
11596         
11597         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11598          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11599         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
11600             Get
11601                 If (Me._adapter Is Nothing) Then
11602                     Me.InitAdapter
11603                 End If
11604                 Return Me._adapter
11605             End Get
11606         End Property
11607         
11608         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11609          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11610         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
11611             Get
11612                 If (Me._connection Is Nothing) Then
11613                     Me.InitConnection
11614                 End If
11615                 Return Me._connection
11616             End Get
11617             Set
11618                 Me._connection = value
11619                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
11620                     Me.Adapter.InsertCommand.Connection = value
11621                 End If
11622                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
11623                     Me.Adapter.DeleteCommand.Connection = value
11624                 End If
11625                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
11626                     Me.Adapter.UpdateCommand.Connection = value
11627                 End If
11628                 Dim i As Integer = 0
11629                 Do While (i < Me.CommandCollection.Length)
11630                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
11631                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
11632                     End If
11633                     i = (i + 1)
11634                 Loop
11635             End Set
11636         End Property
11637         
11638         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11639          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11640         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
11641             Get
11642                 Return Me._transaction
11643             End Get
11644             Set
11645                 Me._transaction = value
11646                 Dim i As Integer = 0
11647                 Do While (i < Me.CommandCollection.Length)
11648                     Me.CommandCollection(i).Transaction = Me._transaction
11649                     i = (i + 1)
11650                 Loop
11651                 If ((Not (Me.Adapter) Is Nothing) _
11652                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
11653                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
11654                 End If
11655                 If ((Not (Me.Adapter) Is Nothing) _
11656                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
11657                     Me.Adapter.InsertCommand.Transaction = Me._transaction
11658                 End If
11659                 If ((Not (Me.Adapter) Is Nothing) _
11660                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
11661                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
11662                 End If
11663             End Set
11664         End Property
11665         
11666         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11667          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11668         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
11669             Get
11670                 If (Me._commandCollection Is Nothing) Then
11671                     Me.InitCommandCollection
11672                 End If
11673                 Return Me._commandCollection
11674             End Get
11675         End Property
11676         
11677         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11678          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11679         Public Property ClearBeforeFill() As Boolean
11680             Get
11681                 Return Me._clearBeforeFill
11682             End Get
11683             Set
11684                 Me._clearBeforeFill = value
11685             End Set
11686         End Property
11687         
11688         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11689          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11690         Private Sub InitAdapter()
11691             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
11692             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
11693             tableMapping.SourceTable = "Table"
11694             tableMapping.DataSetTable = "Category"
11695             tableMapping.ColumnMappings.Add("CategoryName", "CategoryName")
11696             tableMapping.ColumnMappings.Add("VAT", "VAT")
11697             tableMapping.ColumnMappings.Add("ST", "ST")
11698             tableMapping.ColumnMappings.Add("SC", "SC")
11699             Me._adapter.TableMappings.Add(tableMapping)
11700             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
11701             Me._adapter.DeleteCommand.Connection = Me.Connection
11702             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `Category` WHERE ((`CategoryName` = ?) AND ((? = 1 AND `VAT` IS NULL)"& _
11703                 " OR (`VAT` = ?)) AND ((? = 1 AND `ST` IS NULL) OR (`ST` = ?)) AND ((? = 1 AND `S"& _
11704                 "C` IS NULL) OR (`SC` = ?)))"
11705             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
11706             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_CategoryName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CategoryName", Global.System.Data.DataRowVersion.Original, false, Nothing))
11707             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VAT", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VAT", Global.System.Data.DataRowVersion.Original, true, Nothing))
11708             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VAT", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VAT", Global.System.Data.DataRowVersion.Original, false, Nothing))
11709             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ST", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ST", Global.System.Data.DataRowVersion.Original, true, Nothing))
11710             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ST", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ST", Global.System.Data.DataRowVersion.Original, false, Nothing))
11711             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SC", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SC", Global.System.Data.DataRowVersion.Original, true, Nothing))
11712             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SC", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SC", Global.System.Data.DataRowVersion.Original, false, Nothing))
11713             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
11714             Me._adapter.InsertCommand.Connection = Me.Connection
11715             Me._adapter.InsertCommand.CommandText = "INSERT INTO `Category` (`CategoryName`, `VAT`, `ST`, `SC`) VALUES (?, ?, ?, ?)"
11716             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
11717             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("CategoryName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CategoryName", Global.System.Data.DataRowVersion.Current, false, Nothing))
11718             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VAT", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VAT", Global.System.Data.DataRowVersion.Current, false, Nothing))
11719             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ST", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ST", Global.System.Data.DataRowVersion.Current, false, Nothing))
11720             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SC", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SC", Global.System.Data.DataRowVersion.Current, false, Nothing))
11721             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
11722             Me._adapter.UpdateCommand.Connection = Me.Connection
11723             Me._adapter.UpdateCommand.CommandText = "UPDATE `Category` SET `CategoryName` = ?, `VAT` = ?, `ST` = ?, `SC` = ? WHERE ((`"& _
11724                 "CategoryName` = ?) AND ((? = 1 AND `VAT` IS NULL) OR (`VAT` = ?)) AND ((? = 1 AN"& _
11725                 "D `ST` IS NULL) OR (`ST` = ?)) AND ((? = 1 AND `SC` IS NULL) OR (`SC` = ?)))"
11726             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
11727             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("CategoryName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CategoryName", Global.System.Data.DataRowVersion.Current, false, Nothing))
11728             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VAT", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VAT", Global.System.Data.DataRowVersion.Current, false, Nothing))
11729             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ST", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ST", Global.System.Data.DataRowVersion.Current, false, Nothing))
11730             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SC", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SC", Global.System.Data.DataRowVersion.Current, false, Nothing))
11731             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_CategoryName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CategoryName", Global.System.Data.DataRowVersion.Original, false, Nothing))
11732             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VAT", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VAT", Global.System.Data.DataRowVersion.Original, true, Nothing))
11733             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VAT", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VAT", Global.System.Data.DataRowVersion.Original, false, Nothing))
11734             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ST", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ST", Global.System.Data.DataRowVersion.Original, true, Nothing))
11735             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ST", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ST", Global.System.Data.DataRowVersion.Original, false, Nothing))
11736             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SC", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SC", Global.System.Data.DataRowVersion.Original, true, Nothing))
11737             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SC", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SC", Global.System.Data.DataRowVersion.Original, false, Nothing))
11738         End Sub
11739         
11740         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11741          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11742         Private Sub InitConnection()
11743             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
11744             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
11745         End Sub
11746         
11747         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11748          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11749         Private Sub InitCommandCollection()
11750             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
11751             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
11752             Me._commandCollection(0).Connection = Me.Connection
11753             Me._commandCollection(0).CommandText = "SELECT CategoryName, VAT, ST, SC FROM Category"
11754             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
11755         End Sub
11756         
11757         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11758          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11759          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
11760          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
11761         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.CategoryDataTable) As Integer
11762             Me.Adapter.SelectCommand = Me.CommandCollection(0)
11763             If (Me.ClearBeforeFill = true) Then
11764                 dataTable.Clear
11765             End If
11766             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
11767             Return returnValue
11768         End Function
11769         
11770         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11771          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11772          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
11773          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
11774         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.CategoryDataTable
11775             Me.Adapter.SelectCommand = Me.CommandCollection(0)
11776             Dim dataTable As RPOS_DBDataSet.CategoryDataTable = New RPOS_DBDataSet.CategoryDataTable()
11777             Me.Adapter.Fill(dataTable)
11778             Return dataTable
11779         End Function
11780         
11781         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11782          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11783          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
11784         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.CategoryDataTable) As Integer
11785             Return Me.Adapter.Update(dataTable)
11786         End Function
11787         
11788         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11789          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11790          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
11791         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
11792             Return Me.Adapter.Update(dataSet, "Category")
11793         End Function
11794         
11795         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11796          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11797          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
11798         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
11799             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
11800         End Function
11801         
11802         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11803          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11804          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
11805         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
11806             Return Me.Adapter.Update(dataRows)
11807         End Function
11808         
11809         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11810          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11811          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
11812          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
11813         Public Overloads Overridable Function Delete(ByVal Original_CategoryName As String, ByVal Original_VAT As Global.System.Nullable(Of Decimal), ByVal Original_ST As Global.System.Nullable(Of Decimal), ByVal Original_SC As Global.System.Nullable(Of Decimal)) As Integer
11814             If (Original_CategoryName Is Nothing) Then
11815                 Me.Adapter.DeleteCommand.Parameters(0).Value = Global.System.DBNull.Value
11816             Else
11817                 Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_CategoryName,String)
11818             End If
11819             If (Original_VAT.HasValue = true) Then
11820                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
11821                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_VAT.Value,Decimal)
11822             Else
11823                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
11824                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
11825             End If
11826             If (Original_ST.HasValue = true) Then
11827                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
11828                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_ST.Value,Decimal)
11829             Else
11830                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
11831                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
11832             End If
11833             If (Original_SC.HasValue = true) Then
11834                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
11835                 Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_SC.Value,Decimal)
11836             Else
11837                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
11838                 Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
11839             End If
11840             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
11841             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
11842                         <> Global.System.Data.ConnectionState.Open) Then
11843                 Me.Adapter.DeleteCommand.Connection.Open
11844             End If
11845             Try
11846                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
11847                 Return returnValue
11848             Finally
11849                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
11850                     Me.Adapter.DeleteCommand.Connection.Close
11851                 End If
11852             End Try
11853         End Function
11854         
11855         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11856          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11857          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
11858          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
11859         Public Overloads Overridable Function Insert(ByVal CategoryName As String, ByVal VAT As Global.System.Nullable(Of Decimal), ByVal ST As Global.System.Nullable(Of Decimal), ByVal SC As Global.System.Nullable(Of Decimal)) As Integer
11860             If (CategoryName Is Nothing) Then
11861                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
11862             Else
11863                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(CategoryName,String)
11864             End If
11865             If (VAT.HasValue = true) Then
11866                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(VAT.Value,Decimal)
11867             Else
11868                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
11869             End If
11870             If (ST.HasValue = true) Then
11871                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(ST.Value,Decimal)
11872             Else
11873                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
11874             End If
11875             If (SC.HasValue = true) Then
11876                 Me.Adapter.InsertCommand.Parameters(3).Value = CType(SC.Value,Decimal)
11877             Else
11878                 Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
11879             End If
11880             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
11881             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
11882                         <> Global.System.Data.ConnectionState.Open) Then
11883                 Me.Adapter.InsertCommand.Connection.Open
11884             End If
11885             Try
11886                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
11887                 Return returnValue
11888             Finally
11889                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
11890                     Me.Adapter.InsertCommand.Connection.Close
11891                 End If
11892             End Try
11893         End Function
11894         
11895         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11896          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11897          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
11898          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
11899         Public Overloads Overridable Function Update(ByVal CategoryName As String, ByVal VAT As Global.System.Nullable(Of Decimal), ByVal ST As Global.System.Nullable(Of Decimal), ByVal SC As Global.System.Nullable(Of Decimal), ByVal Original_CategoryName As String, ByVal Original_VAT As Global.System.Nullable(Of Decimal), ByVal Original_ST As Global.System.Nullable(Of Decimal), ByVal Original_SC As Global.System.Nullable(Of Decimal)) As Integer
11900             If (CategoryName Is Nothing) Then
11901                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
11902             Else
11903                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(CategoryName,String)
11904             End If
11905             If (VAT.HasValue = true) Then
11906                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(VAT.Value,Decimal)
11907             Else
11908                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
11909             End If
11910             If (ST.HasValue = true) Then
11911                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(ST.Value,Decimal)
11912             Else
11913                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
11914             End If
11915             If (SC.HasValue = true) Then
11916                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(SC.Value,Decimal)
11917             Else
11918                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
11919             End If
11920             If (Original_CategoryName Is Nothing) Then
11921                 Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
11922             Else
11923                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(Original_CategoryName,String)
11924             End If
11925             If (Original_VAT.HasValue = true) Then
11926                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(0,Object)
11927                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(Original_VAT.Value,Decimal)
11928             Else
11929                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(1,Object)
11930                 Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
11931             End If
11932             If (Original_ST.HasValue = true) Then
11933                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(0,Object)
11934                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(Original_ST.Value,Decimal)
11935             Else
11936                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(1,Object)
11937                 Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
11938             End If
11939             If (Original_SC.HasValue = true) Then
11940                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(0,Object)
11941                 Me.Adapter.UpdateCommand.Parameters(10).Value = CType(Original_SC.Value,Decimal)
11942             Else
11943                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(1,Object)
11944                 Me.Adapter.UpdateCommand.Parameters(10).Value = Global.System.DBNull.Value
11945             End If
11946             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
11947             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
11948                         <> Global.System.Data.ConnectionState.Open) Then
11949                 Me.Adapter.UpdateCommand.Connection.Open
11950             End If
11951             Try
11952                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
11953                 Return returnValue
11954             Finally
11955                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
11956                     Me.Adapter.UpdateCommand.Connection.Close
11957                 End If
11958             End Try
11959         End Function
11960         
11961         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11962          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
11963          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
11964          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
11965         Public Overloads Overridable Function Update(ByVal VAT As Global.System.Nullable(Of Decimal), ByVal ST As Global.System.Nullable(Of Decimal), ByVal SC As Global.System.Nullable(Of Decimal), ByVal Original_CategoryName As String, ByVal Original_VAT As Global.System.Nullable(Of Decimal), ByVal Original_ST As Global.System.Nullable(Of Decimal), ByVal Original_SC As Global.System.Nullable(Of Decimal)) As Integer
11966             Return Me.Update(Original_CategoryName, VAT, ST, SC, Original_CategoryName, Original_VAT, Original_ST, Original_SC)
11967         End Function
11968     End Class
11969     
11970     '''<summary>
11971     '''Represents the connection and commands used to retrieve and save data.
11972     '''</summary>
11973     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
11974      Global.System.ComponentModel.ToolboxItem(true), _
11975      Global.System.ComponentModel.DataObjectAttribute(true), _
11976      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
11977         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
11978      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
11979     Partial Public Class DishTableAdapter
11980         Inherits Global.System.ComponentModel.Component
11981         
11982         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
11983         
11984         Private _connection As Global.System.Data.OleDb.OleDbConnection
11985         
11986         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
11987         
11988         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
11989         
11990         Private _clearBeforeFill As Boolean
11991         
11992         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
11993          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
11994         Public Sub New()
11995             MyBase.New
11996             Me.ClearBeforeFill = true
11997         End Sub
11998         
11999         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12000          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12001         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
12002             Get
12003                 If (Me._adapter Is Nothing) Then
12004                     Me.InitAdapter
12005                 End If
12006                 Return Me._adapter
12007             End Get
12008         End Property
12009         
12010         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12011          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12012         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
12013             Get
12014                 If (Me._connection Is Nothing) Then
12015                     Me.InitConnection
12016                 End If
12017                 Return Me._connection
12018             End Get
12019             Set
12020                 Me._connection = value
12021                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
12022                     Me.Adapter.InsertCommand.Connection = value
12023                 End If
12024                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
12025                     Me.Adapter.DeleteCommand.Connection = value
12026                 End If
12027                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
12028                     Me.Adapter.UpdateCommand.Connection = value
12029                 End If
12030                 Dim i As Integer = 0
12031                 Do While (i < Me.CommandCollection.Length)
12032                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
12033                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
12034                     End If
12035                     i = (i + 1)
12036                 Loop
12037             End Set
12038         End Property
12039         
12040         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12041          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12042         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
12043             Get
12044                 Return Me._transaction
12045             End Get
12046             Set
12047                 Me._transaction = value
12048                 Dim i As Integer = 0
12049                 Do While (i < Me.CommandCollection.Length)
12050                     Me.CommandCollection(i).Transaction = Me._transaction
12051                     i = (i + 1)
12052                 Loop
12053                 If ((Not (Me.Adapter) Is Nothing) _
12054                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
12055                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
12056                 End If
12057                 If ((Not (Me.Adapter) Is Nothing) _
12058                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
12059                     Me.Adapter.InsertCommand.Transaction = Me._transaction
12060                 End If
12061                 If ((Not (Me.Adapter) Is Nothing) _
12062                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
12063                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
12064                 End If
12065             End Set
12066         End Property
12067         
12068         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12069          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12070         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
12071             Get
12072                 If (Me._commandCollection Is Nothing) Then
12073                     Me.InitCommandCollection
12074                 End If
12075                 Return Me._commandCollection
12076             End Get
12077         End Property
12078         
12079         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12080          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12081         Public Property ClearBeforeFill() As Boolean
12082             Get
12083                 Return Me._clearBeforeFill
12084             End Get
12085             Set
12086                 Me._clearBeforeFill = value
12087             End Set
12088         End Property
12089         
12090         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12091          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12092         Private Sub InitAdapter()
12093             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
12094             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
12095             tableMapping.SourceTable = "Table"
12096             tableMapping.DataSetTable = "Dish"
12097             tableMapping.ColumnMappings.Add("ItemID", "ItemID")
12098             tableMapping.ColumnMappings.Add("Dishname", "Dishname")
12099             tableMapping.ColumnMappings.Add("Category", "Category")
12100             tableMapping.ColumnMappings.Add("Kitchen", "Kitchen")
12101             tableMapping.ColumnMappings.Add("InventoryType", "InventoryType")
12102             tableMapping.ColumnMappings.Add("Rate", "Rate")
12103             tableMapping.ColumnMappings.Add("Discount", "Discount")
12104             Me._adapter.TableMappings.Add(tableMapping)
12105             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
12106             Me._adapter.DeleteCommand.Connection = Me.Connection
12107             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `Dish` WHERE ((`ItemID` = ?) AND ((? = 1 AND `Dishname` IS NULL) OR ("& _
12108                 "`Dishname` = ?)) AND ((? = 1 AND `Category` IS NULL) OR (`Category` = ?)) AND (("& _
12109                 "? = 1 AND `Kitchen` IS NULL) OR (`Kitchen` = ?)) AND ((? = 1 AND `InventoryType`"& _
12110                 " IS NULL) OR (`InventoryType` = ?)) AND ((? = 1 AND `Rate` IS NULL) OR (`Rate` ="& _
12111                 " ?)) AND ((? = 1 AND `Discount` IS NULL) OR (`Discount` = ?)))"
12112             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
12113             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ItemID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemID", Global.System.Data.DataRowVersion.Original, false, Nothing))
12114             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Dishname", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Dishname", Global.System.Data.DataRowVersion.Original, true, Nothing))
12115             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Dishname", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Dishname", Global.System.Data.DataRowVersion.Original, false, Nothing))
12116             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Category", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Category", Global.System.Data.DataRowVersion.Original, true, Nothing))
12117             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Category", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Category", Global.System.Data.DataRowVersion.Original, false, Nothing))
12118             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Kitchen", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Kitchen", Global.System.Data.DataRowVersion.Original, true, Nothing))
12119             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Kitchen", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Kitchen", Global.System.Data.DataRowVersion.Original, false, Nothing))
12120             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_InventoryType", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Original, true, Nothing))
12121             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_InventoryType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Original, false, Nothing))
12122             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Rate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Rate", Global.System.Data.DataRowVersion.Original, true, Nothing))
12123             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Original, false, Nothing))
12124             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Discount", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Discount", Global.System.Data.DataRowVersion.Original, true, Nothing))
12125             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Discount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Discount", Global.System.Data.DataRowVersion.Original, false, Nothing))
12126             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
12127             Me._adapter.InsertCommand.Connection = Me.Connection
12128             Me._adapter.InsertCommand.CommandText = "INSERT INTO `Dish` (`ItemID`, `Dishname`, `Category`, `Kitchen`, `InventoryType`,"& _
12129                 " `Rate`, `Discount`) VALUES (?, ?, ?, ?, ?, ?, ?)"
12130             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
12131             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ItemID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemID", Global.System.Data.DataRowVersion.Current, false, Nothing))
12132             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Dishname", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Dishname", Global.System.Data.DataRowVersion.Current, false, Nothing))
12133             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Category", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Category", Global.System.Data.DataRowVersion.Current, false, Nothing))
12134             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Kitchen", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Kitchen", Global.System.Data.DataRowVersion.Current, false, Nothing))
12135             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("InventoryType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Current, false, Nothing))
12136             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Current, false, Nothing))
12137             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Discount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Discount", Global.System.Data.DataRowVersion.Current, false, Nothing))
12138             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
12139             Me._adapter.UpdateCommand.Connection = Me.Connection
12140             Me._adapter.UpdateCommand.CommandText = "UPDATE `Dish` SET `ItemID` = ?, `Dishname` = ?, `Category` = ?, `Kitchen` = ?, `I"& _
12141                 "nventoryType` = ?, `Rate` = ?, `Discount` = ? WHERE ((`ItemID` = ?) AND ((? = 1 "& _
12142                 "AND `Dishname` IS NULL) OR (`Dishname` = ?)) AND ((? = 1 AND `Category` IS NULL)"& _
12143                 " OR (`Category` = ?)) AND ((? = 1 AND `Kitchen` IS NULL) OR (`Kitchen` = ?)) AND"& _
12144                 " ((? = 1 AND `InventoryType` IS NULL) OR (`InventoryType` = ?)) AND ((? = 1 AND "& _
12145                 "`Rate` IS NULL) OR (`Rate` = ?)) AND ((? = 1 AND `Discount` IS NULL) OR (`Discou"& _
12146                 "nt` = ?)))"
12147             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
12148             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ItemID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemID", Global.System.Data.DataRowVersion.Current, false, Nothing))
12149             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Dishname", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Dishname", Global.System.Data.DataRowVersion.Current, false, Nothing))
12150             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Category", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Category", Global.System.Data.DataRowVersion.Current, false, Nothing))
12151             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Kitchen", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Kitchen", Global.System.Data.DataRowVersion.Current, false, Nothing))
12152             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("InventoryType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Current, false, Nothing))
12153             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Current, false, Nothing))
12154             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Discount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Discount", Global.System.Data.DataRowVersion.Current, false, Nothing))
12155             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ItemID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemID", Global.System.Data.DataRowVersion.Original, false, Nothing))
12156             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Dishname", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Dishname", Global.System.Data.DataRowVersion.Original, true, Nothing))
12157             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Dishname", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Dishname", Global.System.Data.DataRowVersion.Original, false, Nothing))
12158             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Category", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Category", Global.System.Data.DataRowVersion.Original, true, Nothing))
12159             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Category", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Category", Global.System.Data.DataRowVersion.Original, false, Nothing))
12160             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Kitchen", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Kitchen", Global.System.Data.DataRowVersion.Original, true, Nothing))
12161             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Kitchen", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Kitchen", Global.System.Data.DataRowVersion.Original, false, Nothing))
12162             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_InventoryType", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Original, true, Nothing))
12163             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_InventoryType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Original, false, Nothing))
12164             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Rate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Rate", Global.System.Data.DataRowVersion.Original, true, Nothing))
12165             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Original, false, Nothing))
12166             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Discount", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Discount", Global.System.Data.DataRowVersion.Original, true, Nothing))
12167             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Discount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Discount", Global.System.Data.DataRowVersion.Original, false, Nothing))
12168         End Sub
12169         
12170         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12171          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12172         Private Sub InitConnection()
12173             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
12174             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
12175         End Sub
12176         
12177         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12178          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12179         Private Sub InitCommandCollection()
12180             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
12181             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
12182             Me._commandCollection(0).Connection = Me.Connection
12183             Me._commandCollection(0).CommandText = "SELECT ItemID, Dishname, Category, Kitchen, InventoryType, Rate, Discount FROM Di"& _
12184                 "sh"
12185             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
12186         End Sub
12187         
12188         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12189          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12190          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
12191          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
12192         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.DishDataTable) As Integer
12193             Me.Adapter.SelectCommand = Me.CommandCollection(0)
12194             If (Me.ClearBeforeFill = true) Then
12195                 dataTable.Clear
12196             End If
12197             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
12198             Return returnValue
12199         End Function
12200         
12201         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12202          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12203          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
12204          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
12205         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.DishDataTable
12206             Me.Adapter.SelectCommand = Me.CommandCollection(0)
12207             Dim dataTable As RPOS_DBDataSet.DishDataTable = New RPOS_DBDataSet.DishDataTable()
12208             Me.Adapter.Fill(dataTable)
12209             Return dataTable
12210         End Function
12211         
12212         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12213          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12214          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
12215         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.DishDataTable) As Integer
12216             Return Me.Adapter.Update(dataTable)
12217         End Function
12218         
12219         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12220          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12221          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
12222         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
12223             Return Me.Adapter.Update(dataSet, "Dish")
12224         End Function
12225         
12226         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12227          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12228          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
12229         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
12230             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
12231         End Function
12232         
12233         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12234          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12235          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
12236         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
12237             Return Me.Adapter.Update(dataRows)
12238         End Function
12239         
12240         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12241          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12242          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
12243          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
12244         Public Overloads Overridable Function Delete(ByVal Original_ItemID As Global.System.Nullable(Of Integer), ByVal Original_Dishname As String, ByVal Original_Category As String, ByVal Original_Kitchen As String, ByVal Original_InventoryType As String, ByVal Original_Rate As Global.System.Nullable(Of Decimal), ByVal Original_Discount As Global.System.Nullable(Of Decimal)) As Integer
12245             If (Original_ItemID.HasValue = true) Then
12246                 Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_ItemID.Value,Integer)
12247             Else
12248                 Me.Adapter.DeleteCommand.Parameters(0).Value = Global.System.DBNull.Value
12249             End If
12250             If (Original_Dishname Is Nothing) Then
12251                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
12252                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
12253             Else
12254                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
12255                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_Dishname,String)
12256             End If
12257             If (Original_Category Is Nothing) Then
12258                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
12259                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
12260             Else
12261                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
12262                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_Category,String)
12263             End If
12264             If (Original_Kitchen Is Nothing) Then
12265                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
12266                 Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
12267             Else
12268                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
12269                 Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_Kitchen,String)
12270             End If
12271             If (Original_InventoryType Is Nothing) Then
12272                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(1,Object)
12273                 Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
12274             Else
12275                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(0,Object)
12276                 Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_InventoryType,String)
12277             End If
12278             If (Original_Rate.HasValue = true) Then
12279                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(0,Object)
12280                 Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_Rate.Value,Decimal)
12281             Else
12282                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(1,Object)
12283                 Me.Adapter.DeleteCommand.Parameters(10).Value = Global.System.DBNull.Value
12284             End If
12285             If (Original_Discount.HasValue = true) Then
12286                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(0,Object)
12287                 Me.Adapter.DeleteCommand.Parameters(12).Value = CType(Original_Discount.Value,Decimal)
12288             Else
12289                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(1,Object)
12290                 Me.Adapter.DeleteCommand.Parameters(12).Value = Global.System.DBNull.Value
12291             End If
12292             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
12293             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
12294                         <> Global.System.Data.ConnectionState.Open) Then
12295                 Me.Adapter.DeleteCommand.Connection.Open
12296             End If
12297             Try
12298                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
12299                 Return returnValue
12300             Finally
12301                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
12302                     Me.Adapter.DeleteCommand.Connection.Close
12303                 End If
12304             End Try
12305         End Function
12306         
12307         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12308          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12309          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
12310          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
12311         Public Overloads Overridable Function Insert(ByVal ItemID As Global.System.Nullable(Of Integer), ByVal Dishname As String, ByVal Category As String, ByVal Kitchen As String, ByVal InventoryType As String, ByVal Rate As Global.System.Nullable(Of Decimal), ByVal Discount As Global.System.Nullable(Of Decimal)) As Integer
12312             If (ItemID.HasValue = true) Then
12313                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(ItemID.Value,Integer)
12314             Else
12315                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
12316             End If
12317             If (Dishname Is Nothing) Then
12318                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
12319             Else
12320                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(Dishname,String)
12321             End If
12322             If (Category Is Nothing) Then
12323                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
12324             Else
12325                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(Category,String)
12326             End If
12327             If (Kitchen Is Nothing) Then
12328                 Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
12329             Else
12330                 Me.Adapter.InsertCommand.Parameters(3).Value = CType(Kitchen,String)
12331             End If
12332             If (InventoryType Is Nothing) Then
12333                 Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
12334             Else
12335                 Me.Adapter.InsertCommand.Parameters(4).Value = CType(InventoryType,String)
12336             End If
12337             If (Rate.HasValue = true) Then
12338                 Me.Adapter.InsertCommand.Parameters(5).Value = CType(Rate.Value,Decimal)
12339             Else
12340                 Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
12341             End If
12342             If (Discount.HasValue = true) Then
12343                 Me.Adapter.InsertCommand.Parameters(6).Value = CType(Discount.Value,Decimal)
12344             Else
12345                 Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
12346             End If
12347             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
12348             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
12349                         <> Global.System.Data.ConnectionState.Open) Then
12350                 Me.Adapter.InsertCommand.Connection.Open
12351             End If
12352             Try
12353                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
12354                 Return returnValue
12355             Finally
12356                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
12357                     Me.Adapter.InsertCommand.Connection.Close
12358                 End If
12359             End Try
12360         End Function
12361         
12362         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12363          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12364          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
12365          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
12366         Public Overloads Overridable Function Update(ByVal ItemID As Global.System.Nullable(Of Integer), ByVal Dishname As String, ByVal Category As String, ByVal Kitchen As String, ByVal InventoryType As String, ByVal Rate As Global.System.Nullable(Of Decimal), ByVal Discount As Global.System.Nullable(Of Decimal), ByVal Original_ItemID As Global.System.Nullable(Of Integer), ByVal Original_Dishname As String, ByVal Original_Category As String, ByVal Original_Kitchen As String, ByVal Original_InventoryType As String, ByVal Original_Rate As Global.System.Nullable(Of Decimal), ByVal Original_Discount As Global.System.Nullable(Of Decimal)) As Integer
12367             If (ItemID.HasValue = true) Then
12368                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(ItemID.Value,Integer)
12369             Else
12370                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
12371             End If
12372             If (Dishname Is Nothing) Then
12373                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
12374             Else
12375                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Dishname,String)
12376             End If
12377             If (Category Is Nothing) Then
12378                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
12379             Else
12380                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(Category,String)
12381             End If
12382             If (Kitchen Is Nothing) Then
12383                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
12384             Else
12385                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(Kitchen,String)
12386             End If
12387             If (InventoryType Is Nothing) Then
12388                 Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
12389             Else
12390                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(InventoryType,String)
12391             End If
12392             If (Rate.HasValue = true) Then
12393                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(Rate.Value,Decimal)
12394             Else
12395                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
12396             End If
12397             If (Discount.HasValue = true) Then
12398                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(Discount.Value,Decimal)
12399             Else
12400                 Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
12401             End If
12402             If (Original_ItemID.HasValue = true) Then
12403                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(Original_ItemID.Value,Integer)
12404             Else
12405                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
12406             End If
12407             If (Original_Dishname Is Nothing) Then
12408                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(1,Object)
12409                 Me.Adapter.UpdateCommand.Parameters(9).Value = Global.System.DBNull.Value
12410             Else
12411                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(0,Object)
12412                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(Original_Dishname,String)
12413             End If
12414             If (Original_Category Is Nothing) Then
12415                 Me.Adapter.UpdateCommand.Parameters(10).Value = CType(1,Object)
12416                 Me.Adapter.UpdateCommand.Parameters(11).Value = Global.System.DBNull.Value
12417             Else
12418                 Me.Adapter.UpdateCommand.Parameters(10).Value = CType(0,Object)
12419                 Me.Adapter.UpdateCommand.Parameters(11).Value = CType(Original_Category,String)
12420             End If
12421             If (Original_Kitchen Is Nothing) Then
12422                 Me.Adapter.UpdateCommand.Parameters(12).Value = CType(1,Object)
12423                 Me.Adapter.UpdateCommand.Parameters(13).Value = Global.System.DBNull.Value
12424             Else
12425                 Me.Adapter.UpdateCommand.Parameters(12).Value = CType(0,Object)
12426                 Me.Adapter.UpdateCommand.Parameters(13).Value = CType(Original_Kitchen,String)
12427             End If
12428             If (Original_InventoryType Is Nothing) Then
12429                 Me.Adapter.UpdateCommand.Parameters(14).Value = CType(1,Object)
12430                 Me.Adapter.UpdateCommand.Parameters(15).Value = Global.System.DBNull.Value
12431             Else
12432                 Me.Adapter.UpdateCommand.Parameters(14).Value = CType(0,Object)
12433                 Me.Adapter.UpdateCommand.Parameters(15).Value = CType(Original_InventoryType,String)
12434             End If
12435             If (Original_Rate.HasValue = true) Then
12436                 Me.Adapter.UpdateCommand.Parameters(16).Value = CType(0,Object)
12437                 Me.Adapter.UpdateCommand.Parameters(17).Value = CType(Original_Rate.Value,Decimal)
12438             Else
12439                 Me.Adapter.UpdateCommand.Parameters(16).Value = CType(1,Object)
12440                 Me.Adapter.UpdateCommand.Parameters(17).Value = Global.System.DBNull.Value
12441             End If
12442             If (Original_Discount.HasValue = true) Then
12443                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(0,Object)
12444                 Me.Adapter.UpdateCommand.Parameters(19).Value = CType(Original_Discount.Value,Decimal)
12445             Else
12446                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(1,Object)
12447                 Me.Adapter.UpdateCommand.Parameters(19).Value = Global.System.DBNull.Value
12448             End If
12449             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
12450             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
12451                         <> Global.System.Data.ConnectionState.Open) Then
12452                 Me.Adapter.UpdateCommand.Connection.Open
12453             End If
12454             Try
12455                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
12456                 Return returnValue
12457             Finally
12458                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
12459                     Me.Adapter.UpdateCommand.Connection.Close
12460                 End If
12461             End Try
12462         End Function
12463         
12464         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12465          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12466          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
12467          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
12468         Public Overloads Overridable Function Update(ByVal Dishname As String, ByVal Category As String, ByVal Kitchen As String, ByVal InventoryType As String, ByVal Rate As Global.System.Nullable(Of Decimal), ByVal Discount As Global.System.Nullable(Of Decimal), ByVal Original_ItemID As Global.System.Nullable(Of Integer), ByVal Original_Dishname As String, ByVal Original_Category As String, ByVal Original_Kitchen As String, ByVal Original_InventoryType As String, ByVal Original_Rate As Global.System.Nullable(Of Decimal), ByVal Original_Discount As Global.System.Nullable(Of Decimal)) As Integer
12469             Return Me.Update(Original_ItemID, Dishname, Category, Kitchen, InventoryType, Rate, Discount, Original_ItemID, Original_Dishname, Original_Category, Original_Kitchen, Original_InventoryType, Original_Rate, Original_Discount)
12470         End Function
12471     End Class
12472     
12473     '''<summary>
12474     '''Represents the connection and commands used to retrieve and save data.
12475     '''</summary>
12476     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
12477      Global.System.ComponentModel.ToolboxItem(true), _
12478      Global.System.ComponentModel.DataObjectAttribute(true), _
12479      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
12480         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
12481      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
12482     Partial Public Class HotelTableAdapter
12483         Inherits Global.System.ComponentModel.Component
12484         
12485         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
12486         
12487         Private _connection As Global.System.Data.OleDb.OleDbConnection
12488         
12489         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
12490         
12491         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
12492         
12493         Private _clearBeforeFill As Boolean
12494         
12495         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12496          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12497         Public Sub New()
12498             MyBase.New
12499             Me.ClearBeforeFill = true
12500         End Sub
12501         
12502         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12503          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12504         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
12505             Get
12506                 If (Me._adapter Is Nothing) Then
12507                     Me.InitAdapter
12508                 End If
12509                 Return Me._adapter
12510             End Get
12511         End Property
12512         
12513         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12514          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12515         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
12516             Get
12517                 If (Me._connection Is Nothing) Then
12518                     Me.InitConnection
12519                 End If
12520                 Return Me._connection
12521             End Get
12522             Set
12523                 Me._connection = value
12524                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
12525                     Me.Adapter.InsertCommand.Connection = value
12526                 End If
12527                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
12528                     Me.Adapter.DeleteCommand.Connection = value
12529                 End If
12530                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
12531                     Me.Adapter.UpdateCommand.Connection = value
12532                 End If
12533                 Dim i As Integer = 0
12534                 Do While (i < Me.CommandCollection.Length)
12535                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
12536                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
12537                     End If
12538                     i = (i + 1)
12539                 Loop
12540             End Set
12541         End Property
12542         
12543         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12544          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12545         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
12546             Get
12547                 Return Me._transaction
12548             End Get
12549             Set
12550                 Me._transaction = value
12551                 Dim i As Integer = 0
12552                 Do While (i < Me.CommandCollection.Length)
12553                     Me.CommandCollection(i).Transaction = Me._transaction
12554                     i = (i + 1)
12555                 Loop
12556                 If ((Not (Me.Adapter) Is Nothing) _
12557                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
12558                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
12559                 End If
12560                 If ((Not (Me.Adapter) Is Nothing) _
12561                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
12562                     Me.Adapter.InsertCommand.Transaction = Me._transaction
12563                 End If
12564                 If ((Not (Me.Adapter) Is Nothing) _
12565                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
12566                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
12567                 End If
12568             End Set
12569         End Property
12570         
12571         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12572          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12573         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
12574             Get
12575                 If (Me._commandCollection Is Nothing) Then
12576                     Me.InitCommandCollection
12577                 End If
12578                 Return Me._commandCollection
12579             End Get
12580         End Property
12581         
12582         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12583          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12584         Public Property ClearBeforeFill() As Boolean
12585             Get
12586                 Return Me._clearBeforeFill
12587             End Get
12588             Set
12589                 Me._clearBeforeFill = value
12590             End Set
12591         End Property
12592         
12593         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12594          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12595         Private Sub InitAdapter()
12596             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
12597             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
12598             tableMapping.SourceTable = "Table"
12599             tableMapping.DataSetTable = "Hotel"
12600             tableMapping.ColumnMappings.Add("ID", "ID")
12601             tableMapping.ColumnMappings.Add("HotelName", "HotelName")
12602             tableMapping.ColumnMappings.Add("AddressLine1", "AddressLine1")
12603             tableMapping.ColumnMappings.Add("AddressLine2", "AddressLine2")
12604             tableMapping.ColumnMappings.Add("AddressLine3", "AddressLine3")
12605             tableMapping.ColumnMappings.Add("ContactNo", "ContactNo")
12606             tableMapping.ColumnMappings.Add("EmailID", "EmailID")
12607             tableMapping.ColumnMappings.Add("TIN", "TIN")
12608             tableMapping.ColumnMappings.Add("STNo", "STNo")
12609             tableMapping.ColumnMappings.Add("CIN", "CIN")
12610             tableMapping.ColumnMappings.Add("Logo", "Logo")
12611             tableMapping.ColumnMappings.Add("BaseCurrency", "BaseCurrency")
12612             tableMapping.ColumnMappings.Add("CurrencyCode", "CurrencyCode")
12613             tableMapping.ColumnMappings.Add("TicketFooterMessage", "TicketFooterMessage")
12614             tableMapping.ColumnMappings.Add("StartBillNo", "StartBillNo")
12615             Me._adapter.TableMappings.Add(tableMapping)
12616             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
12617             Me._adapter.DeleteCommand.Connection = Me.Connection
12618             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `Hotel` WHERE ((`ID` = ?) AND ((? = 1 AND `HotelName` IS NULL) OR (`H"& _
12619                 "otelName` = ?)) AND ((? = 1 AND `AddressLine1` IS NULL) OR (`AddressLine1` = ?))"& _
12620                 " AND ((? = 1 AND `AddressLine2` IS NULL) OR (`AddressLine2` = ?)) AND ((? = 1 AN"& _
12621                 "D `AddressLine3` IS NULL) OR (`AddressLine3` = ?)) AND ((? = 1 AND `ContactNo` I"& _
12622                 "S NULL) OR (`ContactNo` = ?)) AND ((? = 1 AND `EmailID` IS NULL) OR (`EmailID` ="& _
12623                 " ?)) AND ((? = 1 AND `TIN` IS NULL) OR (`TIN` = ?)) AND ((? = 1 AND `STNo` IS NU"& _
12624                 "LL) OR (`STNo` = ?)) AND ((? = 1 AND `CIN` IS NULL) OR (`CIN` = ?)) AND ((? = 1 "& _
12625                 "AND `BaseCurrency` IS NULL) OR (`BaseCurrency` = ?)) AND ((? = 1 AND `CurrencyCo"& _
12626                 "de` IS NULL) OR (`CurrencyCode` = ?)) AND ((? = 1 AND `TicketFooterMessage` IS N"& _
12627                 "ULL) OR (`TicketFooterMessage` = ?)) AND ((? = 1 AND `StartBillNo` IS NULL) OR ("& _
12628                 "`StartBillNo` = ?)))"
12629             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
12630             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
12631             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_HotelName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HotelName", Global.System.Data.DataRowVersion.Original, true, Nothing))
12632             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_HotelName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HotelName", Global.System.Data.DataRowVersion.Original, false, Nothing))
12633             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine1", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Original, true, Nothing))
12634             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine1", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Original, false, Nothing))
12635             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine2", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Original, true, Nothing))
12636             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Original, false, Nothing))
12637             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine3", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Original, true, Nothing))
12638             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine3", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Original, false, Nothing))
12639             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ContactNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
12640             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
12641             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_EmailID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Original, true, Nothing))
12642             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_EmailID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Original, false, Nothing))
12643             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TIN", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TIN", Global.System.Data.DataRowVersion.Original, true, Nothing))
12644             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TIN", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TIN", Global.System.Data.DataRowVersion.Original, false, Nothing))
12645             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_STNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
12646             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_STNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
12647             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_CIN", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CIN", Global.System.Data.DataRowVersion.Original, true, Nothing))
12648             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_CIN", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CIN", Global.System.Data.DataRowVersion.Original, false, Nothing))
12649             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BaseCurrency", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BaseCurrency", Global.System.Data.DataRowVersion.Original, true, Nothing))
12650             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BaseCurrency", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BaseCurrency", Global.System.Data.DataRowVersion.Original, false, Nothing))
12651             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_CurrencyCode", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CurrencyCode", Global.System.Data.DataRowVersion.Original, true, Nothing))
12652             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_CurrencyCode", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CurrencyCode", Global.System.Data.DataRowVersion.Original, false, Nothing))
12653             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TicketFooterMessage", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TicketFooterMessage", Global.System.Data.DataRowVersion.Original, true, Nothing))
12654             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TicketFooterMessage", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TicketFooterMessage", Global.System.Data.DataRowVersion.Original, false, Nothing))
12655             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_StartBillNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "StartBillNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
12656             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_StartBillNo", Global.System.Data.OleDb.OleDbType.SmallInt, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "StartBillNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
12657             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
12658             Me._adapter.InsertCommand.Connection = Me.Connection
12659             Me._adapter.InsertCommand.CommandText = "INSERT INTO `Hotel` (`HotelName`, `AddressLine1`, `AddressLine2`, `AddressLine3`,"& _
12660                 " `ContactNo`, `EmailID`, `TIN`, `STNo`, `CIN`, `Logo`, `BaseCurrency`, `Currency"& _
12661                 "Code`, `TicketFooterMessage`, `StartBillNo`) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, "& _
12662                 "?, ?, ?, ?, ?)"
12663             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
12664             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("HotelName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HotelName", Global.System.Data.DataRowVersion.Current, false, Nothing))
12665             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine1", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Current, false, Nothing))
12666             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Current, false, Nothing))
12667             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine3", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Current, false, Nothing))
12668             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
12669             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("EmailID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Current, false, Nothing))
12670             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TIN", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TIN", Global.System.Data.DataRowVersion.Current, false, Nothing))
12671             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("STNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
12672             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("CIN", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CIN", Global.System.Data.DataRowVersion.Current, false, Nothing))
12673             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Logo", Global.System.Data.OleDb.OleDbType.LongVarBinary, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Logo", Global.System.Data.DataRowVersion.Current, false, Nothing))
12674             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BaseCurrency", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BaseCurrency", Global.System.Data.DataRowVersion.Current, false, Nothing))
12675             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("CurrencyCode", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CurrencyCode", Global.System.Data.DataRowVersion.Current, false, Nothing))
12676             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TicketFooterMessage", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TicketFooterMessage", Global.System.Data.DataRowVersion.Current, false, Nothing))
12677             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("StartBillNo", Global.System.Data.OleDb.OleDbType.SmallInt, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "StartBillNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
12678             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
12679             Me._adapter.UpdateCommand.Connection = Me.Connection
12680             Me._adapter.UpdateCommand.CommandText = "UPDATE `Hotel` SET `HotelName` = ?, `AddressLine1` = ?, `AddressLine2` = ?, `Addr"& _
12681                 "essLine3` = ?, `ContactNo` = ?, `EmailID` = ?, `TIN` = ?, `STNo` = ?, `CIN` = ?,"& _
12682                 " `Logo` = ?, `BaseCurrency` = ?, `CurrencyCode` = ?, `TicketFooterMessage` = ?, "& _
12683                 "`StartBillNo` = ? WHERE ((`ID` = ?) AND ((? = 1 AND `HotelName` IS NULL) OR (`Ho"& _
12684                 "telName` = ?)) AND ((? = 1 AND `AddressLine1` IS NULL) OR (`AddressLine1` = ?)) "& _
12685                 "AND ((? = 1 AND `AddressLine2` IS NULL) OR (`AddressLine2` = ?)) AND ((? = 1 AND"& _
12686                 " `AddressLine3` IS NULL) OR (`AddressLine3` = ?)) AND ((? = 1 AND `ContactNo` IS"& _
12687                 " NULL) OR (`ContactNo` = ?)) AND ((? = 1 AND `EmailID` IS NULL) OR (`EmailID` = "& _
12688                 "?)) AND ((? = 1 AND `TIN` IS NULL) OR (`TIN` = ?)) AND ((? = 1 AND `STNo` IS NUL"& _
12689                 "L) OR (`STNo` = ?)) AND ((? = 1 AND `CIN` IS NULL) OR (`CIN` = ?)) AND ((? = 1 A"& _
12690                 "ND `BaseCurrency` IS NULL) OR (`BaseCurrency` = ?)) AND ((? = 1 AND `CurrencyCod"& _
12691                 "e` IS NULL) OR (`CurrencyCode` = ?)) AND ((? = 1 AND `TicketFooterMessage` IS NU"& _
12692                 "LL) OR (`TicketFooterMessage` = ?)) AND ((? = 1 AND `StartBillNo` IS NULL) OR (`"& _
12693                 "StartBillNo` = ?)))"
12694             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
12695             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("HotelName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HotelName", Global.System.Data.DataRowVersion.Current, false, Nothing))
12696             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine1", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Current, false, Nothing))
12697             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Current, false, Nothing))
12698             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine3", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Current, false, Nothing))
12699             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
12700             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("EmailID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Current, false, Nothing))
12701             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TIN", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TIN", Global.System.Data.DataRowVersion.Current, false, Nothing))
12702             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("STNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
12703             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("CIN", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CIN", Global.System.Data.DataRowVersion.Current, false, Nothing))
12704             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Logo", Global.System.Data.OleDb.OleDbType.LongVarBinary, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Logo", Global.System.Data.DataRowVersion.Current, false, Nothing))
12705             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BaseCurrency", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BaseCurrency", Global.System.Data.DataRowVersion.Current, false, Nothing))
12706             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("CurrencyCode", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CurrencyCode", Global.System.Data.DataRowVersion.Current, false, Nothing))
12707             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TicketFooterMessage", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TicketFooterMessage", Global.System.Data.DataRowVersion.Current, false, Nothing))
12708             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("StartBillNo", Global.System.Data.OleDb.OleDbType.SmallInt, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "StartBillNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
12709             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
12710             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_HotelName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HotelName", Global.System.Data.DataRowVersion.Original, true, Nothing))
12711             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_HotelName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HotelName", Global.System.Data.DataRowVersion.Original, false, Nothing))
12712             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine1", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Original, true, Nothing))
12713             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine1", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Original, false, Nothing))
12714             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine2", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Original, true, Nothing))
12715             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Original, false, Nothing))
12716             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine3", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Original, true, Nothing))
12717             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine3", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Original, false, Nothing))
12718             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ContactNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
12719             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
12720             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_EmailID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Original, true, Nothing))
12721             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_EmailID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Original, false, Nothing))
12722             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TIN", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TIN", Global.System.Data.DataRowVersion.Original, true, Nothing))
12723             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TIN", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TIN", Global.System.Data.DataRowVersion.Original, false, Nothing))
12724             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_STNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
12725             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_STNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
12726             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_CIN", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CIN", Global.System.Data.DataRowVersion.Original, true, Nothing))
12727             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_CIN", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CIN", Global.System.Data.DataRowVersion.Original, false, Nothing))
12728             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BaseCurrency", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BaseCurrency", Global.System.Data.DataRowVersion.Original, true, Nothing))
12729             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BaseCurrency", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BaseCurrency", Global.System.Data.DataRowVersion.Original, false, Nothing))
12730             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_CurrencyCode", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CurrencyCode", Global.System.Data.DataRowVersion.Original, true, Nothing))
12731             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_CurrencyCode", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CurrencyCode", Global.System.Data.DataRowVersion.Original, false, Nothing))
12732             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TicketFooterMessage", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TicketFooterMessage", Global.System.Data.DataRowVersion.Original, true, Nothing))
12733             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TicketFooterMessage", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TicketFooterMessage", Global.System.Data.DataRowVersion.Original, false, Nothing))
12734             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_StartBillNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "StartBillNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
12735             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_StartBillNo", Global.System.Data.OleDb.OleDbType.SmallInt, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "StartBillNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
12736         End Sub
12737         
12738         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12739          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12740         Private Sub InitConnection()
12741             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
12742             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
12743         End Sub
12744         
12745         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12746          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
12747         Private Sub InitCommandCollection()
12748             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
12749             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
12750             Me._commandCollection(0).Connection = Me.Connection
12751             Me._commandCollection(0).CommandText = "SELECT ID, HotelName, AddressLine1, AddressLine2, AddressLine3, ContactNo, EmailI"& _
12752                 "D, TIN, STNo, CIN, Logo, BaseCurrency, CurrencyCode, TicketFooterMessage, StartB"& _
12753                 "illNo FROM Hotel"
12754             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
12755         End Sub
12756         
12757         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12758          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12759          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
12760          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
12761         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.HotelDataTable) As Integer
12762             Me.Adapter.SelectCommand = Me.CommandCollection(0)
12763             If (Me.ClearBeforeFill = true) Then
12764                 dataTable.Clear
12765             End If
12766             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
12767             Return returnValue
12768         End Function
12769         
12770         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12771          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12772          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
12773          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
12774         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.HotelDataTable
12775             Me.Adapter.SelectCommand = Me.CommandCollection(0)
12776             Dim dataTable As RPOS_DBDataSet.HotelDataTable = New RPOS_DBDataSet.HotelDataTable()
12777             Me.Adapter.Fill(dataTable)
12778             Return dataTable
12779         End Function
12780         
12781         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12782          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12783          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
12784         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.HotelDataTable) As Integer
12785             Return Me.Adapter.Update(dataTable)
12786         End Function
12787         
12788         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12789          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12790          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
12791         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
12792             Return Me.Adapter.Update(dataSet, "Hotel")
12793         End Function
12794         
12795         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12796          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12797          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
12798         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
12799             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
12800         End Function
12801         
12802         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12803          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12804          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
12805         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
12806             Return Me.Adapter.Update(dataRows)
12807         End Function
12808         
12809         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12810          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12811          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
12812          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
12813         Public Overloads Overridable Function Delete(ByVal Original_ID As Integer, ByVal Original_HotelName As String, ByVal Original_AddressLine1 As String, ByVal Original_AddressLine2 As String, ByVal Original_AddressLine3 As String, ByVal Original_ContactNo As String, ByVal Original_EmailID As String, ByVal Original_TIN As String, ByVal Original_STNo As String, ByVal Original_CIN As String, ByVal Original_BaseCurrency As String, ByVal Original_CurrencyCode As String, ByVal Original_TicketFooterMessage As String, ByVal Original_StartBillNo As Global.System.Nullable(Of Short)) As Integer
12814             Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_ID,Integer)
12815             If (Original_HotelName Is Nothing) Then
12816                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
12817                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
12818             Else
12819                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
12820                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_HotelName,String)
12821             End If
12822             If (Original_AddressLine1 Is Nothing) Then
12823                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
12824                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
12825             Else
12826                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
12827                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_AddressLine1,String)
12828             End If
12829             If (Original_AddressLine2 Is Nothing) Then
12830                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
12831                 Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
12832             Else
12833                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
12834                 Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_AddressLine2,String)
12835             End If
12836             If (Original_AddressLine3 Is Nothing) Then
12837                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(1,Object)
12838                 Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
12839             Else
12840                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(0,Object)
12841                 Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_AddressLine3,String)
12842             End If
12843             If (Original_ContactNo Is Nothing) Then
12844                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(1,Object)
12845                 Me.Adapter.DeleteCommand.Parameters(10).Value = Global.System.DBNull.Value
12846             Else
12847                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(0,Object)
12848                 Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_ContactNo,String)
12849             End If
12850             If (Original_EmailID Is Nothing) Then
12851                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(1,Object)
12852                 Me.Adapter.DeleteCommand.Parameters(12).Value = Global.System.DBNull.Value
12853             Else
12854                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(0,Object)
12855                 Me.Adapter.DeleteCommand.Parameters(12).Value = CType(Original_EmailID,String)
12856             End If
12857             If (Original_TIN Is Nothing) Then
12858                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(1,Object)
12859                 Me.Adapter.DeleteCommand.Parameters(14).Value = Global.System.DBNull.Value
12860             Else
12861                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(0,Object)
12862                 Me.Adapter.DeleteCommand.Parameters(14).Value = CType(Original_TIN,String)
12863             End If
12864             If (Original_STNo Is Nothing) Then
12865                 Me.Adapter.DeleteCommand.Parameters(15).Value = CType(1,Object)
12866                 Me.Adapter.DeleteCommand.Parameters(16).Value = Global.System.DBNull.Value
12867             Else
12868                 Me.Adapter.DeleteCommand.Parameters(15).Value = CType(0,Object)
12869                 Me.Adapter.DeleteCommand.Parameters(16).Value = CType(Original_STNo,String)
12870             End If
12871             If (Original_CIN Is Nothing) Then
12872                 Me.Adapter.DeleteCommand.Parameters(17).Value = CType(1,Object)
12873                 Me.Adapter.DeleteCommand.Parameters(18).Value = Global.System.DBNull.Value
12874             Else
12875                 Me.Adapter.DeleteCommand.Parameters(17).Value = CType(0,Object)
12876                 Me.Adapter.DeleteCommand.Parameters(18).Value = CType(Original_CIN,String)
12877             End If
12878             If (Original_BaseCurrency Is Nothing) Then
12879                 Me.Adapter.DeleteCommand.Parameters(19).Value = CType(1,Object)
12880                 Me.Adapter.DeleteCommand.Parameters(20).Value = Global.System.DBNull.Value
12881             Else
12882                 Me.Adapter.DeleteCommand.Parameters(19).Value = CType(0,Object)
12883                 Me.Adapter.DeleteCommand.Parameters(20).Value = CType(Original_BaseCurrency,String)
12884             End If
12885             If (Original_CurrencyCode Is Nothing) Then
12886                 Me.Adapter.DeleteCommand.Parameters(21).Value = CType(1,Object)
12887                 Me.Adapter.DeleteCommand.Parameters(22).Value = Global.System.DBNull.Value
12888             Else
12889                 Me.Adapter.DeleteCommand.Parameters(21).Value = CType(0,Object)
12890                 Me.Adapter.DeleteCommand.Parameters(22).Value = CType(Original_CurrencyCode,String)
12891             End If
12892             If (Original_TicketFooterMessage Is Nothing) Then
12893                 Me.Adapter.DeleteCommand.Parameters(23).Value = CType(1,Object)
12894                 Me.Adapter.DeleteCommand.Parameters(24).Value = Global.System.DBNull.Value
12895             Else
12896                 Me.Adapter.DeleteCommand.Parameters(23).Value = CType(0,Object)
12897                 Me.Adapter.DeleteCommand.Parameters(24).Value = CType(Original_TicketFooterMessage,String)
12898             End If
12899             If (Original_StartBillNo.HasValue = true) Then
12900                 Me.Adapter.DeleteCommand.Parameters(25).Value = CType(0,Object)
12901                 Me.Adapter.DeleteCommand.Parameters(26).Value = CType(Original_StartBillNo.Value,Short)
12902             Else
12903                 Me.Adapter.DeleteCommand.Parameters(25).Value = CType(1,Object)
12904                 Me.Adapter.DeleteCommand.Parameters(26).Value = Global.System.DBNull.Value
12905             End If
12906             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
12907             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
12908                         <> Global.System.Data.ConnectionState.Open) Then
12909                 Me.Adapter.DeleteCommand.Connection.Open
12910             End If
12911             Try
12912                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
12913                 Return returnValue
12914             Finally
12915                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
12916                     Me.Adapter.DeleteCommand.Connection.Close
12917                 End If
12918             End Try
12919         End Function
12920         
12921         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
12922          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
12923          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
12924          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
12925         Public Overloads Overridable Function Insert(ByVal HotelName As String, ByVal AddressLine1 As String, ByVal AddressLine2 As String, ByVal AddressLine3 As String, ByVal ContactNo As String, ByVal EmailID As String, ByVal TIN As String, ByVal STNo As String, ByVal CIN As String, ByVal Logo() As Byte, ByVal BaseCurrency As String, ByVal CurrencyCode As String, ByVal TicketFooterMessage As String, ByVal StartBillNo As Global.System.Nullable(Of Short)) As Integer
12926             If (HotelName Is Nothing) Then
12927                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
12928             Else
12929                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(HotelName,String)
12930             End If
12931             If (AddressLine1 Is Nothing) Then
12932                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
12933             Else
12934                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(AddressLine1,String)
12935             End If
12936             If (AddressLine2 Is Nothing) Then
12937                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
12938             Else
12939                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(AddressLine2,String)
12940             End If
12941             If (AddressLine3 Is Nothing) Then
12942                 Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
12943             Else
12944                 Me.Adapter.InsertCommand.Parameters(3).Value = CType(AddressLine3,String)
12945             End If
12946             If (ContactNo Is Nothing) Then
12947                 Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
12948             Else
12949                 Me.Adapter.InsertCommand.Parameters(4).Value = CType(ContactNo,String)
12950             End If
12951             If (EmailID Is Nothing) Then
12952                 Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
12953             Else
12954                 Me.Adapter.InsertCommand.Parameters(5).Value = CType(EmailID,String)
12955             End If
12956             If (TIN Is Nothing) Then
12957                 Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
12958             Else
12959                 Me.Adapter.InsertCommand.Parameters(6).Value = CType(TIN,String)
12960             End If
12961             If (STNo Is Nothing) Then
12962                 Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
12963             Else
12964                 Me.Adapter.InsertCommand.Parameters(7).Value = CType(STNo,String)
12965             End If
12966             If (CIN Is Nothing) Then
12967                 Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
12968             Else
12969                 Me.Adapter.InsertCommand.Parameters(8).Value = CType(CIN,String)
12970             End If
12971             If (Logo Is Nothing) Then
12972                 Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
12973             Else
12974                 Me.Adapter.InsertCommand.Parameters(9).Value = CType(Logo,Byte())
12975             End If
12976             If (BaseCurrency Is Nothing) Then
12977                 Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
12978             Else
12979                 Me.Adapter.InsertCommand.Parameters(10).Value = CType(BaseCurrency,String)
12980             End If
12981             If (CurrencyCode Is Nothing) Then
12982                 Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
12983             Else
12984                 Me.Adapter.InsertCommand.Parameters(11).Value = CType(CurrencyCode,String)
12985             End If
12986             If (TicketFooterMessage Is Nothing) Then
12987                 Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
12988             Else
12989                 Me.Adapter.InsertCommand.Parameters(12).Value = CType(TicketFooterMessage,String)
12990             End If
12991             If (StartBillNo.HasValue = true) Then
12992                 Me.Adapter.InsertCommand.Parameters(13).Value = CType(StartBillNo.Value,Short)
12993             Else
12994                 Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
12995             End If
12996             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
12997             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
12998                         <> Global.System.Data.ConnectionState.Open) Then
12999                 Me.Adapter.InsertCommand.Connection.Open
13000             End If
13001             Try
13002                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
13003                 Return returnValue
13004             Finally
13005                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
13006                     Me.Adapter.InsertCommand.Connection.Close
13007                 End If
13008             End Try
13009         End Function
13010         
13011         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13012          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13013          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13014          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
13015         Public Overloads Overridable Function Update( _
13016                     ByVal HotelName As String, _
13017                     ByVal AddressLine1 As String, _
13018                     ByVal AddressLine2 As String, _
13019                     ByVal AddressLine3 As String, _
13020                     ByVal ContactNo As String, _
13021                     ByVal EmailID As String, _
13022                     ByVal TIN As String, _
13023                     ByVal STNo As String, _
13024                     ByVal CIN As String, _
13025                     ByVal Logo() As Byte, _
13026                     ByVal BaseCurrency As String, _
13027                     ByVal CurrencyCode As String, _
13028                     ByVal TicketFooterMessage As String, _
13029                     ByVal StartBillNo As Global.System.Nullable(Of Short), _
13030                     ByVal Original_ID As Integer, _
13031                     ByVal Original_HotelName As String, _
13032                     ByVal Original_AddressLine1 As String, _
13033                     ByVal Original_AddressLine2 As String, _
13034                     ByVal Original_AddressLine3 As String, _
13035                     ByVal Original_ContactNo As String, _
13036                     ByVal Original_EmailID As String, _
13037                     ByVal Original_TIN As String, _
13038                     ByVal Original_STNo As String, _
13039                     ByVal Original_CIN As String, _
13040                     ByVal Original_BaseCurrency As String, _
13041                     ByVal Original_CurrencyCode As String, _
13042                     ByVal Original_TicketFooterMessage As String, _
13043                     ByVal Original_StartBillNo As Global.System.Nullable(Of Short)) As Integer
13044             If (HotelName Is Nothing) Then
13045                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
13046             Else
13047                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(HotelName,String)
13048             End If
13049             If (AddressLine1 Is Nothing) Then
13050                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
13051             Else
13052                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(AddressLine1,String)
13053             End If
13054             If (AddressLine2 Is Nothing) Then
13055                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
13056             Else
13057                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(AddressLine2,String)
13058             End If
13059             If (AddressLine3 Is Nothing) Then
13060                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
13061             Else
13062                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(AddressLine3,String)
13063             End If
13064             If (ContactNo Is Nothing) Then
13065                 Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
13066             Else
13067                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(ContactNo,String)
13068             End If
13069             If (EmailID Is Nothing) Then
13070                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
13071             Else
13072                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(EmailID,String)
13073             End If
13074             If (TIN Is Nothing) Then
13075                 Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
13076             Else
13077                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(TIN,String)
13078             End If
13079             If (STNo Is Nothing) Then
13080                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
13081             Else
13082                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(STNo,String)
13083             End If
13084             If (CIN Is Nothing) Then
13085                 Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
13086             Else
13087                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(CIN,String)
13088             End If
13089             If (Logo Is Nothing) Then
13090                 Me.Adapter.UpdateCommand.Parameters(9).Value = Global.System.DBNull.Value
13091             Else
13092                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(Logo,Byte())
13093             End If
13094             If (BaseCurrency Is Nothing) Then
13095                 Me.Adapter.UpdateCommand.Parameters(10).Value = Global.System.DBNull.Value
13096             Else
13097                 Me.Adapter.UpdateCommand.Parameters(10).Value = CType(BaseCurrency,String)
13098             End If
13099             If (CurrencyCode Is Nothing) Then
13100                 Me.Adapter.UpdateCommand.Parameters(11).Value = Global.System.DBNull.Value
13101             Else
13102                 Me.Adapter.UpdateCommand.Parameters(11).Value = CType(CurrencyCode,String)
13103             End If
13104             If (TicketFooterMessage Is Nothing) Then
13105                 Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
13106             Else
13107                 Me.Adapter.UpdateCommand.Parameters(12).Value = CType(TicketFooterMessage,String)
13108             End If
13109             If (StartBillNo.HasValue = true) Then
13110                 Me.Adapter.UpdateCommand.Parameters(13).Value = CType(StartBillNo.Value,Short)
13111             Else
13112                 Me.Adapter.UpdateCommand.Parameters(13).Value = Global.System.DBNull.Value
13113             End If
13114             Me.Adapter.UpdateCommand.Parameters(14).Value = CType(Original_ID,Integer)
13115             If (Original_HotelName Is Nothing) Then
13116                 Me.Adapter.UpdateCommand.Parameters(15).Value = CType(1,Object)
13117                 Me.Adapter.UpdateCommand.Parameters(16).Value = Global.System.DBNull.Value
13118             Else
13119                 Me.Adapter.UpdateCommand.Parameters(15).Value = CType(0,Object)
13120                 Me.Adapter.UpdateCommand.Parameters(16).Value = CType(Original_HotelName,String)
13121             End If
13122             If (Original_AddressLine1 Is Nothing) Then
13123                 Me.Adapter.UpdateCommand.Parameters(17).Value = CType(1,Object)
13124                 Me.Adapter.UpdateCommand.Parameters(18).Value = Global.System.DBNull.Value
13125             Else
13126                 Me.Adapter.UpdateCommand.Parameters(17).Value = CType(0,Object)
13127                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(Original_AddressLine1,String)
13128             End If
13129             If (Original_AddressLine2 Is Nothing) Then
13130                 Me.Adapter.UpdateCommand.Parameters(19).Value = CType(1,Object)
13131                 Me.Adapter.UpdateCommand.Parameters(20).Value = Global.System.DBNull.Value
13132             Else
13133                 Me.Adapter.UpdateCommand.Parameters(19).Value = CType(0,Object)
13134                 Me.Adapter.UpdateCommand.Parameters(20).Value = CType(Original_AddressLine2,String)
13135             End If
13136             If (Original_AddressLine3 Is Nothing) Then
13137                 Me.Adapter.UpdateCommand.Parameters(21).Value = CType(1,Object)
13138                 Me.Adapter.UpdateCommand.Parameters(22).Value = Global.System.DBNull.Value
13139             Else
13140                 Me.Adapter.UpdateCommand.Parameters(21).Value = CType(0,Object)
13141                 Me.Adapter.UpdateCommand.Parameters(22).Value = CType(Original_AddressLine3,String)
13142             End If
13143             If (Original_ContactNo Is Nothing) Then
13144                 Me.Adapter.UpdateCommand.Parameters(23).Value = CType(1,Object)
13145                 Me.Adapter.UpdateCommand.Parameters(24).Value = Global.System.DBNull.Value
13146             Else
13147                 Me.Adapter.UpdateCommand.Parameters(23).Value = CType(0,Object)
13148                 Me.Adapter.UpdateCommand.Parameters(24).Value = CType(Original_ContactNo,String)
13149             End If
13150             If (Original_EmailID Is Nothing) Then
13151                 Me.Adapter.UpdateCommand.Parameters(25).Value = CType(1,Object)
13152                 Me.Adapter.UpdateCommand.Parameters(26).Value = Global.System.DBNull.Value
13153             Else
13154                 Me.Adapter.UpdateCommand.Parameters(25).Value = CType(0,Object)
13155                 Me.Adapter.UpdateCommand.Parameters(26).Value = CType(Original_EmailID,String)
13156             End If
13157             If (Original_TIN Is Nothing) Then
13158                 Me.Adapter.UpdateCommand.Parameters(27).Value = CType(1,Object)
13159                 Me.Adapter.UpdateCommand.Parameters(28).Value = Global.System.DBNull.Value
13160             Else
13161                 Me.Adapter.UpdateCommand.Parameters(27).Value = CType(0,Object)
13162                 Me.Adapter.UpdateCommand.Parameters(28).Value = CType(Original_TIN,String)
13163             End If
13164             If (Original_STNo Is Nothing) Then
13165                 Me.Adapter.UpdateCommand.Parameters(29).Value = CType(1,Object)
13166                 Me.Adapter.UpdateCommand.Parameters(30).Value = Global.System.DBNull.Value
13167             Else
13168                 Me.Adapter.UpdateCommand.Parameters(29).Value = CType(0,Object)
13169                 Me.Adapter.UpdateCommand.Parameters(30).Value = CType(Original_STNo,String)
13170             End If
13171             If (Original_CIN Is Nothing) Then
13172                 Me.Adapter.UpdateCommand.Parameters(31).Value = CType(1,Object)
13173                 Me.Adapter.UpdateCommand.Parameters(32).Value = Global.System.DBNull.Value
13174             Else
13175                 Me.Adapter.UpdateCommand.Parameters(31).Value = CType(0,Object)
13176                 Me.Adapter.UpdateCommand.Parameters(32).Value = CType(Original_CIN,String)
13177             End If
13178             If (Original_BaseCurrency Is Nothing) Then
13179                 Me.Adapter.UpdateCommand.Parameters(33).Value = CType(1,Object)
13180                 Me.Adapter.UpdateCommand.Parameters(34).Value = Global.System.DBNull.Value
13181             Else
13182                 Me.Adapter.UpdateCommand.Parameters(33).Value = CType(0,Object)
13183                 Me.Adapter.UpdateCommand.Parameters(34).Value = CType(Original_BaseCurrency,String)
13184             End If
13185             If (Original_CurrencyCode Is Nothing) Then
13186                 Me.Adapter.UpdateCommand.Parameters(35).Value = CType(1,Object)
13187                 Me.Adapter.UpdateCommand.Parameters(36).Value = Global.System.DBNull.Value
13188             Else
13189                 Me.Adapter.UpdateCommand.Parameters(35).Value = CType(0,Object)
13190                 Me.Adapter.UpdateCommand.Parameters(36).Value = CType(Original_CurrencyCode,String)
13191             End If
13192             If (Original_TicketFooterMessage Is Nothing) Then
13193                 Me.Adapter.UpdateCommand.Parameters(37).Value = CType(1,Object)
13194                 Me.Adapter.UpdateCommand.Parameters(38).Value = Global.System.DBNull.Value
13195             Else
13196                 Me.Adapter.UpdateCommand.Parameters(37).Value = CType(0,Object)
13197                 Me.Adapter.UpdateCommand.Parameters(38).Value = CType(Original_TicketFooterMessage,String)
13198             End If
13199             If (Original_StartBillNo.HasValue = true) Then
13200                 Me.Adapter.UpdateCommand.Parameters(39).Value = CType(0,Object)
13201                 Me.Adapter.UpdateCommand.Parameters(40).Value = CType(Original_StartBillNo.Value,Short)
13202             Else
13203                 Me.Adapter.UpdateCommand.Parameters(39).Value = CType(1,Object)
13204                 Me.Adapter.UpdateCommand.Parameters(40).Value = Global.System.DBNull.Value
13205             End If
13206             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
13207             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
13208                         <> Global.System.Data.ConnectionState.Open) Then
13209                 Me.Adapter.UpdateCommand.Connection.Open
13210             End If
13211             Try
13212                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
13213                 Return returnValue
13214             Finally
13215                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
13216                     Me.Adapter.UpdateCommand.Connection.Close
13217                 End If
13218             End Try
13219         End Function
13220     End Class
13221     
13222     '''<summary>
13223     '''Represents the connection and commands used to retrieve and save data.
13224     '''</summary>
13225     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
13226      Global.System.ComponentModel.ToolboxItem(true), _
13227      Global.System.ComponentModel.DataObjectAttribute(true), _
13228      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
13229         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
13230      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
13231     Partial Public Class InventoryTypeTableAdapter
13232         Inherits Global.System.ComponentModel.Component
13233         
13234         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
13235         
13236         Private _connection As Global.System.Data.OleDb.OleDbConnection
13237         
13238         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
13239         
13240         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
13241         
13242         Private _clearBeforeFill As Boolean
13243         
13244         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13245          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13246         Public Sub New()
13247             MyBase.New
13248             Me.ClearBeforeFill = true
13249         End Sub
13250         
13251         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13252          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13253         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
13254             Get
13255                 If (Me._adapter Is Nothing) Then
13256                     Me.InitAdapter
13257                 End If
13258                 Return Me._adapter
13259             End Get
13260         End Property
13261         
13262         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13263          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13264         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
13265             Get
13266                 If (Me._connection Is Nothing) Then
13267                     Me.InitConnection
13268                 End If
13269                 Return Me._connection
13270             End Get
13271             Set
13272                 Me._connection = value
13273                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
13274                     Me.Adapter.InsertCommand.Connection = value
13275                 End If
13276                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
13277                     Me.Adapter.DeleteCommand.Connection = value
13278                 End If
13279                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
13280                     Me.Adapter.UpdateCommand.Connection = value
13281                 End If
13282                 Dim i As Integer = 0
13283                 Do While (i < Me.CommandCollection.Length)
13284                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
13285                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
13286                     End If
13287                     i = (i + 1)
13288                 Loop
13289             End Set
13290         End Property
13291         
13292         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13293          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13294         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
13295             Get
13296                 Return Me._transaction
13297             End Get
13298             Set
13299                 Me._transaction = value
13300                 Dim i As Integer = 0
13301                 Do While (i < Me.CommandCollection.Length)
13302                     Me.CommandCollection(i).Transaction = Me._transaction
13303                     i = (i + 1)
13304                 Loop
13305                 If ((Not (Me.Adapter) Is Nothing) _
13306                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
13307                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
13308                 End If
13309                 If ((Not (Me.Adapter) Is Nothing) _
13310                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
13311                     Me.Adapter.InsertCommand.Transaction = Me._transaction
13312                 End If
13313                 If ((Not (Me.Adapter) Is Nothing) _
13314                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
13315                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
13316                 End If
13317             End Set
13318         End Property
13319         
13320         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13321          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13322         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
13323             Get
13324                 If (Me._commandCollection Is Nothing) Then
13325                     Me.InitCommandCollection
13326                 End If
13327                 Return Me._commandCollection
13328             End Get
13329         End Property
13330         
13331         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13332          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13333         Public Property ClearBeforeFill() As Boolean
13334             Get
13335                 Return Me._clearBeforeFill
13336             End Get
13337             Set
13338                 Me._clearBeforeFill = value
13339             End Set
13340         End Property
13341         
13342         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13343          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13344         Private Sub InitAdapter()
13345             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
13346             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
13347             tableMapping.SourceTable = "Table"
13348             tableMapping.DataSetTable = "InventoryType"
13349             tableMapping.ColumnMappings.Add("Type", "Type")
13350             Me._adapter.TableMappings.Add(tableMapping)
13351             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
13352             Me._adapter.DeleteCommand.Connection = Me.Connection
13353             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `InventoryType` WHERE ((`Type` = ?))"
13354             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
13355             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Type", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Type", Global.System.Data.DataRowVersion.Original, false, Nothing))
13356             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
13357             Me._adapter.InsertCommand.Connection = Me.Connection
13358             Me._adapter.InsertCommand.CommandText = "INSERT INTO `InventoryType` (`Type`) VALUES (?)"
13359             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
13360             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Type", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Type", Global.System.Data.DataRowVersion.Current, false, Nothing))
13361             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
13362             Me._adapter.UpdateCommand.Connection = Me.Connection
13363             Me._adapter.UpdateCommand.CommandText = "UPDATE `InventoryType` SET `Type` = ? WHERE ((`Type` = ?))"
13364             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
13365             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Type", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Type", Global.System.Data.DataRowVersion.Current, false, Nothing))
13366             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Type", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Type", Global.System.Data.DataRowVersion.Original, false, Nothing))
13367         End Sub
13368         
13369         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13370          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13371         Private Sub InitConnection()
13372             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
13373             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
13374         End Sub
13375         
13376         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13377          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13378         Private Sub InitCommandCollection()
13379             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
13380             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
13381             Me._commandCollection(0).Connection = Me.Connection
13382             Me._commandCollection(0).CommandText = "SELECT Type FROM InventoryType"
13383             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
13384         End Sub
13385         
13386         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13387          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13388          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13389          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
13390         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.InventoryTypeDataTable) As Integer
13391             Me.Adapter.SelectCommand = Me.CommandCollection(0)
13392             If (Me.ClearBeforeFill = true) Then
13393                 dataTable.Clear
13394             End If
13395             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
13396             Return returnValue
13397         End Function
13398         
13399         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13400          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13401          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13402          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
13403         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.InventoryTypeDataTable
13404             Me.Adapter.SelectCommand = Me.CommandCollection(0)
13405             Dim dataTable As RPOS_DBDataSet.InventoryTypeDataTable = New RPOS_DBDataSet.InventoryTypeDataTable()
13406             Me.Adapter.Fill(dataTable)
13407             Return dataTable
13408         End Function
13409         
13410         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13411          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13412          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
13413         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.InventoryTypeDataTable) As Integer
13414             Return Me.Adapter.Update(dataTable)
13415         End Function
13416         
13417         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13418          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13419          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
13420         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
13421             Return Me.Adapter.Update(dataSet, "InventoryType")
13422         End Function
13423         
13424         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13425          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13426          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
13427         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
13428             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
13429         End Function
13430         
13431         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13432          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13433          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
13434         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
13435             Return Me.Adapter.Update(dataRows)
13436         End Function
13437         
13438         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13439          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13440          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13441          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
13442         Public Overloads Overridable Function Delete(ByVal Original_Type As String) As Integer
13443             If (Original_Type Is Nothing) Then
13444                 Me.Adapter.DeleteCommand.Parameters(0).Value = Global.System.DBNull.Value
13445             Else
13446                 Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_Type,String)
13447             End If
13448             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
13449             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
13450                         <> Global.System.Data.ConnectionState.Open) Then
13451                 Me.Adapter.DeleteCommand.Connection.Open
13452             End If
13453             Try
13454                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
13455                 Return returnValue
13456             Finally
13457                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
13458                     Me.Adapter.DeleteCommand.Connection.Close
13459                 End If
13460             End Try
13461         End Function
13462         
13463         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13464          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13465          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13466          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
13467         Public Overloads Overridable Function Insert(ByVal Type As String) As Integer
13468             If (Type Is Nothing) Then
13469                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
13470             Else
13471                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(Type,String)
13472             End If
13473             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
13474             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
13475                         <> Global.System.Data.ConnectionState.Open) Then
13476                 Me.Adapter.InsertCommand.Connection.Open
13477             End If
13478             Try
13479                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
13480                 Return returnValue
13481             Finally
13482                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
13483                     Me.Adapter.InsertCommand.Connection.Close
13484                 End If
13485             End Try
13486         End Function
13487         
13488         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13489          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13490          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13491          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
13492         Public Overloads Overridable Function Update(ByVal Type As String, ByVal Original_Type As String) As Integer
13493             If (Type Is Nothing) Then
13494                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
13495             Else
13496                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(Type,String)
13497             End If
13498             If (Original_Type Is Nothing) Then
13499                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
13500             Else
13501                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Original_Type,String)
13502             End If
13503             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
13504             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
13505                         <> Global.System.Data.ConnectionState.Open) Then
13506                 Me.Adapter.UpdateCommand.Connection.Open
13507             End If
13508             Try
13509                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
13510                 Return returnValue
13511             Finally
13512                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
13513                     Me.Adapter.UpdateCommand.Connection.Close
13514                 End If
13515             End Try
13516         End Function
13517         
13518         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13519          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13520          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13521          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
13522         Public Overloads Overridable Function Update(ByVal Original_Type As String) As Integer
13523             Return Me.Update(Original_Type, Original_Type)
13524         End Function
13525     End Class
13526     
13527     '''<summary>
13528     '''Represents the connection and commands used to retrieve and save data.
13529     '''</summary>
13530     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
13531      Global.System.ComponentModel.ToolboxItem(true), _
13532      Global.System.ComponentModel.DataObjectAttribute(true), _
13533      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
13534         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
13535      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
13536     Partial Public Class KitchenTableAdapter
13537         Inherits Global.System.ComponentModel.Component
13538         
13539         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
13540         
13541         Private _connection As Global.System.Data.OleDb.OleDbConnection
13542         
13543         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
13544         
13545         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
13546         
13547         Private _clearBeforeFill As Boolean
13548         
13549         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13550          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13551         Public Sub New()
13552             MyBase.New
13553             Me.ClearBeforeFill = true
13554         End Sub
13555         
13556         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13557          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13558         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
13559             Get
13560                 If (Me._adapter Is Nothing) Then
13561                     Me.InitAdapter
13562                 End If
13563                 Return Me._adapter
13564             End Get
13565         End Property
13566         
13567         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13568          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13569         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
13570             Get
13571                 If (Me._connection Is Nothing) Then
13572                     Me.InitConnection
13573                 End If
13574                 Return Me._connection
13575             End Get
13576             Set
13577                 Me._connection = value
13578                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
13579                     Me.Adapter.InsertCommand.Connection = value
13580                 End If
13581                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
13582                     Me.Adapter.DeleteCommand.Connection = value
13583                 End If
13584                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
13585                     Me.Adapter.UpdateCommand.Connection = value
13586                 End If
13587                 Dim i As Integer = 0
13588                 Do While (i < Me.CommandCollection.Length)
13589                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
13590                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
13591                     End If
13592                     i = (i + 1)
13593                 Loop
13594             End Set
13595         End Property
13596         
13597         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13598          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13599         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
13600             Get
13601                 Return Me._transaction
13602             End Get
13603             Set
13604                 Me._transaction = value
13605                 Dim i As Integer = 0
13606                 Do While (i < Me.CommandCollection.Length)
13607                     Me.CommandCollection(i).Transaction = Me._transaction
13608                     i = (i + 1)
13609                 Loop
13610                 If ((Not (Me.Adapter) Is Nothing) _
13611                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
13612                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
13613                 End If
13614                 If ((Not (Me.Adapter) Is Nothing) _
13615                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
13616                     Me.Adapter.InsertCommand.Transaction = Me._transaction
13617                 End If
13618                 If ((Not (Me.Adapter) Is Nothing) _
13619                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
13620                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
13621                 End If
13622             End Set
13623         End Property
13624         
13625         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13626          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13627         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
13628             Get
13629                 If (Me._commandCollection Is Nothing) Then
13630                     Me.InitCommandCollection
13631                 End If
13632                 Return Me._commandCollection
13633             End Get
13634         End Property
13635         
13636         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13637          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13638         Public Property ClearBeforeFill() As Boolean
13639             Get
13640                 Return Me._clearBeforeFill
13641             End Get
13642             Set
13643                 Me._clearBeforeFill = value
13644             End Set
13645         End Property
13646         
13647         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13648          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13649         Private Sub InitAdapter()
13650             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
13651             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
13652             tableMapping.SourceTable = "Table"
13653             tableMapping.DataSetTable = "Kitchen"
13654             tableMapping.ColumnMappings.Add("KitchenName", "KitchenName")
13655             tableMapping.ColumnMappings.Add("Printer", "Printer")
13656             tableMapping.ColumnMappings.Add("IsEnabled", "IsEnabled")
13657             Me._adapter.TableMappings.Add(tableMapping)
13658             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
13659             Me._adapter.DeleteCommand.Connection = Me.Connection
13660             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `Kitchen` WHERE ((`KitchenName` = ?) AND ((? = 1 AND `Printer` IS NUL"& _
13661                 "L) OR (`Printer` = ?)) AND ((? = 1 AND `IsEnabled` IS NULL) OR (`IsEnabled` = ?)"& _
13662                 "))"
13663             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
13664             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_KitchenName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "KitchenName", Global.System.Data.DataRowVersion.Original, false, Nothing))
13665             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Printer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Printer", Global.System.Data.DataRowVersion.Original, true, Nothing))
13666             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Printer", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Printer", Global.System.Data.DataRowVersion.Original, false, Nothing))
13667             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_IsEnabled", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Original, true, Nothing))
13668             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_IsEnabled", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Original, false, Nothing))
13669             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
13670             Me._adapter.InsertCommand.Connection = Me.Connection
13671             Me._adapter.InsertCommand.CommandText = "INSERT INTO `Kitchen` (`KitchenName`, `Printer`, `IsEnabled`) VALUES (?, ?, ?)"
13672             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
13673             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("KitchenName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "KitchenName", Global.System.Data.DataRowVersion.Current, false, Nothing))
13674             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Printer", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Printer", Global.System.Data.DataRowVersion.Current, false, Nothing))
13675             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsEnabled", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Current, false, Nothing))
13676             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
13677             Me._adapter.UpdateCommand.Connection = Me.Connection
13678             Me._adapter.UpdateCommand.CommandText = "UPDATE `Kitchen` SET `KitchenName` = ?, `Printer` = ?, `IsEnabled` = ? WHERE ((`K"& _
13679                 "itchenName` = ?) AND ((? = 1 AND `Printer` IS NULL) OR (`Printer` = ?)) AND ((? "& _
13680                 "= 1 AND `IsEnabled` IS NULL) OR (`IsEnabled` = ?)))"
13681             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
13682             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("KitchenName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "KitchenName", Global.System.Data.DataRowVersion.Current, false, Nothing))
13683             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Printer", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Printer", Global.System.Data.DataRowVersion.Current, false, Nothing))
13684             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsEnabled", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Current, false, Nothing))
13685             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_KitchenName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "KitchenName", Global.System.Data.DataRowVersion.Original, false, Nothing))
13686             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Printer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Printer", Global.System.Data.DataRowVersion.Original, true, Nothing))
13687             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Printer", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Printer", Global.System.Data.DataRowVersion.Original, false, Nothing))
13688             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_IsEnabled", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Original, true, Nothing))
13689             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_IsEnabled", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Original, false, Nothing))
13690         End Sub
13691         
13692         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13693          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13694         Private Sub InitConnection()
13695             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
13696             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
13697         End Sub
13698         
13699         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13700          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13701         Private Sub InitCommandCollection()
13702             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
13703             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
13704             Me._commandCollection(0).Connection = Me.Connection
13705             Me._commandCollection(0).CommandText = "SELECT KitchenName, Printer, IsEnabled FROM Kitchen"
13706             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
13707         End Sub
13708         
13709         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13710          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13711          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13712          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
13713         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.KitchenDataTable) As Integer
13714             Me.Adapter.SelectCommand = Me.CommandCollection(0)
13715             If (Me.ClearBeforeFill = true) Then
13716                 dataTable.Clear
13717             End If
13718             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
13719             Return returnValue
13720         End Function
13721         
13722         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13723          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13724          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13725          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
13726         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.KitchenDataTable
13727             Me.Adapter.SelectCommand = Me.CommandCollection(0)
13728             Dim dataTable As RPOS_DBDataSet.KitchenDataTable = New RPOS_DBDataSet.KitchenDataTable()
13729             Me.Adapter.Fill(dataTable)
13730             Return dataTable
13731         End Function
13732         
13733         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13734          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13735          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
13736         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.KitchenDataTable) As Integer
13737             Return Me.Adapter.Update(dataTable)
13738         End Function
13739         
13740         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13741          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13742          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
13743         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
13744             Return Me.Adapter.Update(dataSet, "Kitchen")
13745         End Function
13746         
13747         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13748          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13749          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
13750         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
13751             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
13752         End Function
13753         
13754         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13755          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13756          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
13757         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
13758             Return Me.Adapter.Update(dataRows)
13759         End Function
13760         
13761         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13762          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13763          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13764          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
13765         Public Overloads Overridable Function Delete(ByVal Original_KitchenName As String, ByVal Original_Printer As String, ByVal Original_IsEnabled As String) As Integer
13766             If (Original_KitchenName Is Nothing) Then
13767                 Me.Adapter.DeleteCommand.Parameters(0).Value = Global.System.DBNull.Value
13768             Else
13769                 Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_KitchenName,String)
13770             End If
13771             If (Original_Printer Is Nothing) Then
13772                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
13773                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
13774             Else
13775                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
13776                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_Printer,String)
13777             End If
13778             If (Original_IsEnabled Is Nothing) Then
13779                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
13780                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
13781             Else
13782                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
13783                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_IsEnabled,String)
13784             End If
13785             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
13786             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
13787                         <> Global.System.Data.ConnectionState.Open) Then
13788                 Me.Adapter.DeleteCommand.Connection.Open
13789             End If
13790             Try
13791                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
13792                 Return returnValue
13793             Finally
13794                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
13795                     Me.Adapter.DeleteCommand.Connection.Close
13796                 End If
13797             End Try
13798         End Function
13799         
13800         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13801          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13802          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13803          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
13804         Public Overloads Overridable Function Insert(ByVal KitchenName As String, ByVal Printer As String, ByVal IsEnabled As String) As Integer
13805             If (KitchenName Is Nothing) Then
13806                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
13807             Else
13808                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(KitchenName,String)
13809             End If
13810             If (Printer Is Nothing) Then
13811                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
13812             Else
13813                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(Printer,String)
13814             End If
13815             If (IsEnabled Is Nothing) Then
13816                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
13817             Else
13818                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(IsEnabled,String)
13819             End If
13820             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
13821             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
13822                         <> Global.System.Data.ConnectionState.Open) Then
13823                 Me.Adapter.InsertCommand.Connection.Open
13824             End If
13825             Try
13826                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
13827                 Return returnValue
13828             Finally
13829                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
13830                     Me.Adapter.InsertCommand.Connection.Close
13831                 End If
13832             End Try
13833         End Function
13834         
13835         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13836          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13837          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13838          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
13839         Public Overloads Overridable Function Update(ByVal KitchenName As String, ByVal Printer As String, ByVal IsEnabled As String, ByVal Original_KitchenName As String, ByVal Original_Printer As String, ByVal Original_IsEnabled As String) As Integer
13840             If (KitchenName Is Nothing) Then
13841                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
13842             Else
13843                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(KitchenName,String)
13844             End If
13845             If (Printer Is Nothing) Then
13846                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
13847             Else
13848                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Printer,String)
13849             End If
13850             If (IsEnabled Is Nothing) Then
13851                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
13852             Else
13853                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(IsEnabled,String)
13854             End If
13855             If (Original_KitchenName Is Nothing) Then
13856                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
13857             Else
13858                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(Original_KitchenName,String)
13859             End If
13860             If (Original_Printer Is Nothing) Then
13861                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(1,Object)
13862                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
13863             Else
13864                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(0,Object)
13865                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(Original_Printer,String)
13866             End If
13867             If (Original_IsEnabled Is Nothing) Then
13868                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(1,Object)
13869                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
13870             Else
13871                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(0,Object)
13872                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(Original_IsEnabled,String)
13873             End If
13874             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
13875             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
13876                         <> Global.System.Data.ConnectionState.Open) Then
13877                 Me.Adapter.UpdateCommand.Connection.Open
13878             End If
13879             Try
13880                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
13881                 Return returnValue
13882             Finally
13883                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
13884                     Me.Adapter.UpdateCommand.Connection.Close
13885                 End If
13886             End Try
13887         End Function
13888         
13889         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13890          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
13891          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
13892          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
13893         Public Overloads Overridable Function Update(ByVal Printer As String, ByVal IsEnabled As String, ByVal Original_KitchenName As String, ByVal Original_Printer As String, ByVal Original_IsEnabled As String) As Integer
13894             Return Me.Update(Original_KitchenName, Printer, IsEnabled, Original_KitchenName, Original_Printer, Original_IsEnabled)
13895         End Function
13896     End Class
13897     
13898     '''<summary>
13899     '''Represents the connection and commands used to retrieve and save data.
13900     '''</summary>
13901     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
13902      Global.System.ComponentModel.ToolboxItem(true), _
13903      Global.System.ComponentModel.DataObjectAttribute(true), _
13904      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
13905         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
13906      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
13907     Partial Public Class KOTGenerationTableAdapter
13908         Inherits Global.System.ComponentModel.Component
13909         
13910         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
13911         
13912         Private _connection As Global.System.Data.OleDb.OleDbConnection
13913         
13914         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
13915         
13916         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
13917         
13918         Private _clearBeforeFill As Boolean
13919         
13920         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13921          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13922         Public Sub New()
13923             MyBase.New
13924             Me.ClearBeforeFill = true
13925         End Sub
13926         
13927         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13928          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13929         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
13930             Get
13931                 If (Me._adapter Is Nothing) Then
13932                     Me.InitAdapter
13933                 End If
13934                 Return Me._adapter
13935             End Get
13936         End Property
13937         
13938         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13939          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13940         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
13941             Get
13942                 If (Me._connection Is Nothing) Then
13943                     Me.InitConnection
13944                 End If
13945                 Return Me._connection
13946             End Get
13947             Set
13948                 Me._connection = value
13949                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
13950                     Me.Adapter.InsertCommand.Connection = value
13951                 End If
13952                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
13953                     Me.Adapter.DeleteCommand.Connection = value
13954                 End If
13955                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
13956                     Me.Adapter.UpdateCommand.Connection = value
13957                 End If
13958                 Dim i As Integer = 0
13959                 Do While (i < Me.CommandCollection.Length)
13960                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
13961                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
13962                     End If
13963                     i = (i + 1)
13964                 Loop
13965             End Set
13966         End Property
13967         
13968         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13969          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13970         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
13971             Get
13972                 Return Me._transaction
13973             End Get
13974             Set
13975                 Me._transaction = value
13976                 Dim i As Integer = 0
13977                 Do While (i < Me.CommandCollection.Length)
13978                     Me.CommandCollection(i).Transaction = Me._transaction
13979                     i = (i + 1)
13980                 Loop
13981                 If ((Not (Me.Adapter) Is Nothing) _
13982                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
13983                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
13984                 End If
13985                 If ((Not (Me.Adapter) Is Nothing) _
13986                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
13987                     Me.Adapter.InsertCommand.Transaction = Me._transaction
13988                 End If
13989                 If ((Not (Me.Adapter) Is Nothing) _
13990                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
13991                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
13992                 End If
13993             End Set
13994         End Property
13995         
13996         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
13997          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
13998         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
13999             Get
14000                 If (Me._commandCollection Is Nothing) Then
14001                     Me.InitCommandCollection
14002                 End If
14003                 Return Me._commandCollection
14004             End Get
14005         End Property
14006         
14007         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14008          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14009         Public Property ClearBeforeFill() As Boolean
14010             Get
14011                 Return Me._clearBeforeFill
14012             End Get
14013             Set
14014                 Me._clearBeforeFill = value
14015             End Set
14016         End Property
14017         
14018         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14019          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14020         Private Sub InitAdapter()
14021             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
14022             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
14023             tableMapping.SourceTable = "Table"
14024             tableMapping.DataSetTable = "KOTGeneration"
14025             tableMapping.ColumnMappings.Add("TicketID", "TicketID")
14026             tableMapping.ColumnMappings.Add("BillDate", "BillDate")
14027             tableMapping.ColumnMappings.Add("TableNo", "TableNo")
14028             tableMapping.ColumnMappings.Add("GroupName", "GroupName")
14029             tableMapping.ColumnMappings.Add("GrandTotal", "GrandTotal")
14030             tableMapping.ColumnMappings.Add("OperatorID", "OperatorID")
14031             tableMapping.ColumnMappings.Add("BillNote", "BillNote")
14032             tableMapping.ColumnMappings.Add("Status", "Status")
14033             Me._adapter.TableMappings.Add(tableMapping)
14034             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
14035             Me._adapter.DeleteCommand.Connection = Me.Connection
14036             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `KOTGeneration` WHERE ((`TicketID` = ?) AND ((? = 1 AND `BillDate` IS"& _
14037                 " NULL) OR (`BillDate` = ?)) AND ((? = 1 AND `TableNo` IS NULL) OR (`TableNo` = ?"& _
14038                 ")) AND ((? = 1 AND `GroupName` IS NULL) OR (`GroupName` = ?)) AND ((? = 1 AND `G"& _
14039                 "randTotal` IS NULL) OR (`GrandTotal` = ?)) AND ((? = 1 AND `OperatorID` IS NULL)"& _
14040                 " OR (`OperatorID` = ?)) AND ((? = 1 AND `BillNote` IS NULL) OR (`BillNote` = ?))"& _
14041                 " AND ((? = 1 AND `Status` IS NULL) OR (`Status` = ?)))"
14042             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
14043             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TicketID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TicketID", Global.System.Data.DataRowVersion.Original, false, Nothing))
14044             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BillDate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Original, true, Nothing))
14045             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Original, false, Nothing))
14046             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TableNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
14047             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
14048             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_GroupName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Original, true, Nothing))
14049             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_GroupName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Original, false, Nothing))
14050             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_GrandTotal", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Original, true, Nothing))
14051             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_GrandTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Original, false, Nothing))
14052             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_OperatorID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Original, true, Nothing))
14053             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_OperatorID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Original, false, Nothing))
14054             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BillNote", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Original, true, Nothing))
14055             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Original, false, Nothing))
14056             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Status", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Original, true, Nothing))
14057             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Status", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Original, false, Nothing))
14058             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
14059             Me._adapter.InsertCommand.Connection = Me.Connection
14060             Me._adapter.InsertCommand.CommandText = "INSERT INTO `KOTGeneration` (`TicketID`, `BillDate`, `TableNo`, `GroupName`, `Gra"& _
14061                 "ndTotal`, `OperatorID`, `BillNote`, `Status`) VALUES (?, ?, ?, ?, ?, ?, ?, ?)"
14062             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
14063             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TicketID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TicketID", Global.System.Data.DataRowVersion.Current, false, Nothing))
14064             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Current, false, Nothing))
14065             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
14066             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("GroupName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Current, false, Nothing))
14067             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("GrandTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Current, false, Nothing))
14068             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("OperatorID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Current, false, Nothing))
14069             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Current, false, Nothing))
14070             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Status", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Current, false, Nothing))
14071             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
14072             Me._adapter.UpdateCommand.Connection = Me.Connection
14073             Me._adapter.UpdateCommand.CommandText = "UPDATE `KOTGeneration` SET `TicketID` = ?, `BillDate` = ?, `TableNo` = ?, `GroupN"& _
14074                 "ame` = ?, `GrandTotal` = ?, `OperatorID` = ?, `BillNote` = ?, `Status` = ? WHERE"& _
14075                 " ((`TicketID` = ?) AND ((? = 1 AND `BillDate` IS NULL) OR (`BillDate` = ?)) AND "& _
14076                 "((? = 1 AND `TableNo` IS NULL) OR (`TableNo` = ?)) AND ((? = 1 AND `GroupName` I"& _
14077                 "S NULL) OR (`GroupName` = ?)) AND ((? = 1 AND `GrandTotal` IS NULL) OR (`GrandTo"& _
14078                 "tal` = ?)) AND ((? = 1 AND `OperatorID` IS NULL) OR (`OperatorID` = ?)) AND ((? "& _
14079                 "= 1 AND `BillNote` IS NULL) OR (`BillNote` = ?)) AND ((? = 1 AND `Status` IS NUL"& _
14080                 "L) OR (`Status` = ?)))"
14081             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
14082             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TicketID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TicketID", Global.System.Data.DataRowVersion.Current, false, Nothing))
14083             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Current, false, Nothing))
14084             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
14085             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("GroupName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Current, false, Nothing))
14086             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("GrandTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Current, false, Nothing))
14087             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("OperatorID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Current, false, Nothing))
14088             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Current, false, Nothing))
14089             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Status", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Current, false, Nothing))
14090             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TicketID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TicketID", Global.System.Data.DataRowVersion.Original, false, Nothing))
14091             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BillDate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Original, true, Nothing))
14092             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Original, false, Nothing))
14093             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TableNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
14094             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
14095             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_GroupName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Original, true, Nothing))
14096             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_GroupName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Original, false, Nothing))
14097             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_GrandTotal", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Original, true, Nothing))
14098             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_GrandTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Original, false, Nothing))
14099             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_OperatorID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Original, true, Nothing))
14100             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_OperatorID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Original, false, Nothing))
14101             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BillNote", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Original, true, Nothing))
14102             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Original, false, Nothing))
14103             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Status", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Original, true, Nothing))
14104             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Status", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Original, false, Nothing))
14105         End Sub
14106         
14107         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14108          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14109         Private Sub InitConnection()
14110             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
14111             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
14112         End Sub
14113         
14114         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14115          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14116         Private Sub InitCommandCollection()
14117             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
14118             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
14119             Me._commandCollection(0).Connection = Me.Connection
14120             Me._commandCollection(0).CommandText = "SELECT TicketID, BillDate, TableNo, GroupName, GrandTotal, OperatorID, BillNote, "& _
14121                 "Status FROM KOTGeneration"
14122             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
14123         End Sub
14124         
14125         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14126          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14127          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
14128          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
14129         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.KOTGenerationDataTable) As Integer
14130             Me.Adapter.SelectCommand = Me.CommandCollection(0)
14131             If (Me.ClearBeforeFill = true) Then
14132                 dataTable.Clear
14133             End If
14134             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
14135             Return returnValue
14136         End Function
14137         
14138         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14139          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14140          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
14141          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
14142         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.KOTGenerationDataTable
14143             Me.Adapter.SelectCommand = Me.CommandCollection(0)
14144             Dim dataTable As RPOS_DBDataSet.KOTGenerationDataTable = New RPOS_DBDataSet.KOTGenerationDataTable()
14145             Me.Adapter.Fill(dataTable)
14146             Return dataTable
14147         End Function
14148         
14149         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14150          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14151          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
14152         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.KOTGenerationDataTable) As Integer
14153             Return Me.Adapter.Update(dataTable)
14154         End Function
14155         
14156         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14157          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14158          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
14159         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
14160             Return Me.Adapter.Update(dataSet, "KOTGeneration")
14161         End Function
14162         
14163         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14164          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14165          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
14166         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
14167             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
14168         End Function
14169         
14170         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14171          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14172          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
14173         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
14174             Return Me.Adapter.Update(dataRows)
14175         End Function
14176         
14177         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14178          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14179          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
14180          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
14181         Public Overloads Overridable Function Delete(ByVal Original_TicketID As Global.System.Nullable(Of Integer), ByVal Original_BillDate As Global.System.Nullable(Of Date), ByVal Original_TableNo As String, ByVal Original_GroupName As String, ByVal Original_GrandTotal As Global.System.Nullable(Of Decimal), ByVal Original_OperatorID As String, ByVal Original_BillNote As String, ByVal Original_Status As String) As Integer
14182             If (Original_TicketID.HasValue = true) Then
14183                 Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_TicketID.Value,Integer)
14184             Else
14185                 Me.Adapter.DeleteCommand.Parameters(0).Value = Global.System.DBNull.Value
14186             End If
14187             If (Original_BillDate.HasValue = true) Then
14188                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
14189                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_BillDate.Value,Date)
14190             Else
14191                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
14192                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
14193             End If
14194             If (Original_TableNo Is Nothing) Then
14195                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
14196                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
14197             Else
14198                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
14199                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_TableNo,String)
14200             End If
14201             If (Original_GroupName Is Nothing) Then
14202                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
14203                 Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
14204             Else
14205                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
14206                 Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_GroupName,String)
14207             End If
14208             If (Original_GrandTotal.HasValue = true) Then
14209                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(0,Object)
14210                 Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_GrandTotal.Value,Decimal)
14211             Else
14212                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(1,Object)
14213                 Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
14214             End If
14215             If (Original_OperatorID Is Nothing) Then
14216                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(1,Object)
14217                 Me.Adapter.DeleteCommand.Parameters(10).Value = Global.System.DBNull.Value
14218             Else
14219                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(0,Object)
14220                 Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_OperatorID,String)
14221             End If
14222             If (Original_BillNote Is Nothing) Then
14223                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(1,Object)
14224                 Me.Adapter.DeleteCommand.Parameters(12).Value = Global.System.DBNull.Value
14225             Else
14226                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(0,Object)
14227                 Me.Adapter.DeleteCommand.Parameters(12).Value = CType(Original_BillNote,String)
14228             End If
14229             If (Original_Status Is Nothing) Then
14230                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(1,Object)
14231                 Me.Adapter.DeleteCommand.Parameters(14).Value = Global.System.DBNull.Value
14232             Else
14233                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(0,Object)
14234                 Me.Adapter.DeleteCommand.Parameters(14).Value = CType(Original_Status,String)
14235             End If
14236             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
14237             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
14238                         <> Global.System.Data.ConnectionState.Open) Then
14239                 Me.Adapter.DeleteCommand.Connection.Open
14240             End If
14241             Try
14242                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
14243                 Return returnValue
14244             Finally
14245                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
14246                     Me.Adapter.DeleteCommand.Connection.Close
14247                 End If
14248             End Try
14249         End Function
14250         
14251         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14252          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14253          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
14254          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
14255         Public Overloads Overridable Function Insert(ByVal TicketID As Global.System.Nullable(Of Integer), ByVal BillDate As Global.System.Nullable(Of Date), ByVal TableNo As String, ByVal GroupName As String, ByVal GrandTotal As Global.System.Nullable(Of Decimal), ByVal OperatorID As String, ByVal BillNote As String, ByVal Status As String) As Integer
14256             If (TicketID.HasValue = true) Then
14257                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(TicketID.Value,Integer)
14258             Else
14259                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
14260             End If
14261             If (BillDate.HasValue = true) Then
14262                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(BillDate.Value,Date)
14263             Else
14264                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
14265             End If
14266             If (TableNo Is Nothing) Then
14267                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
14268             Else
14269                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(TableNo,String)
14270             End If
14271             If (GroupName Is Nothing) Then
14272                 Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
14273             Else
14274                 Me.Adapter.InsertCommand.Parameters(3).Value = CType(GroupName,String)
14275             End If
14276             If (GrandTotal.HasValue = true) Then
14277                 Me.Adapter.InsertCommand.Parameters(4).Value = CType(GrandTotal.Value,Decimal)
14278             Else
14279                 Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
14280             End If
14281             If (OperatorID Is Nothing) Then
14282                 Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
14283             Else
14284                 Me.Adapter.InsertCommand.Parameters(5).Value = CType(OperatorID,String)
14285             End If
14286             If (BillNote Is Nothing) Then
14287                 Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
14288             Else
14289                 Me.Adapter.InsertCommand.Parameters(6).Value = CType(BillNote,String)
14290             End If
14291             If (Status Is Nothing) Then
14292                 Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
14293             Else
14294                 Me.Adapter.InsertCommand.Parameters(7).Value = CType(Status,String)
14295             End If
14296             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
14297             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
14298                         <> Global.System.Data.ConnectionState.Open) Then
14299                 Me.Adapter.InsertCommand.Connection.Open
14300             End If
14301             Try
14302                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
14303                 Return returnValue
14304             Finally
14305                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
14306                     Me.Adapter.InsertCommand.Connection.Close
14307                 End If
14308             End Try
14309         End Function
14310         
14311         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14312          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14313          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
14314          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
14315         Public Overloads Overridable Function Update( _
14316                     ByVal TicketID As Global.System.Nullable(Of Integer), _
14317                     ByVal BillDate As Global.System.Nullable(Of Date), _
14318                     ByVal TableNo As String, _
14319                     ByVal GroupName As String, _
14320                     ByVal GrandTotal As Global.System.Nullable(Of Decimal), _
14321                     ByVal OperatorID As String, _
14322                     ByVal BillNote As String, _
14323                     ByVal Status As String, _
14324                     ByVal Original_TicketID As Global.System.Nullable(Of Integer), _
14325                     ByVal Original_BillDate As Global.System.Nullable(Of Date), _
14326                     ByVal Original_TableNo As String, _
14327                     ByVal Original_GroupName As String, _
14328                     ByVal Original_GrandTotal As Global.System.Nullable(Of Decimal), _
14329                     ByVal Original_OperatorID As String, _
14330                     ByVal Original_BillNote As String, _
14331                     ByVal Original_Status As String) As Integer
14332             If (TicketID.HasValue = true) Then
14333                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(TicketID.Value,Integer)
14334             Else
14335                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
14336             End If
14337             If (BillDate.HasValue = true) Then
14338                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(BillDate.Value,Date)
14339             Else
14340                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
14341             End If
14342             If (TableNo Is Nothing) Then
14343                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
14344             Else
14345                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(TableNo,String)
14346             End If
14347             If (GroupName Is Nothing) Then
14348                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
14349             Else
14350                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(GroupName,String)
14351             End If
14352             If (GrandTotal.HasValue = true) Then
14353                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(GrandTotal.Value,Decimal)
14354             Else
14355                 Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
14356             End If
14357             If (OperatorID Is Nothing) Then
14358                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
14359             Else
14360                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(OperatorID,String)
14361             End If
14362             If (BillNote Is Nothing) Then
14363                 Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
14364             Else
14365                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(BillNote,String)
14366             End If
14367             If (Status Is Nothing) Then
14368                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
14369             Else
14370                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(Status,String)
14371             End If
14372             If (Original_TicketID.HasValue = true) Then
14373                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(Original_TicketID.Value,Integer)
14374             Else
14375                 Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
14376             End If
14377             If (Original_BillDate.HasValue = true) Then
14378                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(0,Object)
14379                 Me.Adapter.UpdateCommand.Parameters(10).Value = CType(Original_BillDate.Value,Date)
14380             Else
14381                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(1,Object)
14382                 Me.Adapter.UpdateCommand.Parameters(10).Value = Global.System.DBNull.Value
14383             End If
14384             If (Original_TableNo Is Nothing) Then
14385                 Me.Adapter.UpdateCommand.Parameters(11).Value = CType(1,Object)
14386                 Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
14387             Else
14388                 Me.Adapter.UpdateCommand.Parameters(11).Value = CType(0,Object)
14389                 Me.Adapter.UpdateCommand.Parameters(12).Value = CType(Original_TableNo,String)
14390             End If
14391             If (Original_GroupName Is Nothing) Then
14392                 Me.Adapter.UpdateCommand.Parameters(13).Value = CType(1,Object)
14393                 Me.Adapter.UpdateCommand.Parameters(14).Value = Global.System.DBNull.Value
14394             Else
14395                 Me.Adapter.UpdateCommand.Parameters(13).Value = CType(0,Object)
14396                 Me.Adapter.UpdateCommand.Parameters(14).Value = CType(Original_GroupName,String)
14397             End If
14398             If (Original_GrandTotal.HasValue = true) Then
14399                 Me.Adapter.UpdateCommand.Parameters(15).Value = CType(0,Object)
14400                 Me.Adapter.UpdateCommand.Parameters(16).Value = CType(Original_GrandTotal.Value,Decimal)
14401             Else
14402                 Me.Adapter.UpdateCommand.Parameters(15).Value = CType(1,Object)
14403                 Me.Adapter.UpdateCommand.Parameters(16).Value = Global.System.DBNull.Value
14404             End If
14405             If (Original_OperatorID Is Nothing) Then
14406                 Me.Adapter.UpdateCommand.Parameters(17).Value = CType(1,Object)
14407                 Me.Adapter.UpdateCommand.Parameters(18).Value = Global.System.DBNull.Value
14408             Else
14409                 Me.Adapter.UpdateCommand.Parameters(17).Value = CType(0,Object)
14410                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(Original_OperatorID,String)
14411             End If
14412             If (Original_BillNote Is Nothing) Then
14413                 Me.Adapter.UpdateCommand.Parameters(19).Value = CType(1,Object)
14414                 Me.Adapter.UpdateCommand.Parameters(20).Value = Global.System.DBNull.Value
14415             Else
14416                 Me.Adapter.UpdateCommand.Parameters(19).Value = CType(0,Object)
14417                 Me.Adapter.UpdateCommand.Parameters(20).Value = CType(Original_BillNote,String)
14418             End If
14419             If (Original_Status Is Nothing) Then
14420                 Me.Adapter.UpdateCommand.Parameters(21).Value = CType(1,Object)
14421                 Me.Adapter.UpdateCommand.Parameters(22).Value = Global.System.DBNull.Value
14422             Else
14423                 Me.Adapter.UpdateCommand.Parameters(21).Value = CType(0,Object)
14424                 Me.Adapter.UpdateCommand.Parameters(22).Value = CType(Original_Status,String)
14425             End If
14426             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
14427             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
14428                         <> Global.System.Data.ConnectionState.Open) Then
14429                 Me.Adapter.UpdateCommand.Connection.Open
14430             End If
14431             Try
14432                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
14433                 Return returnValue
14434             Finally
14435                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
14436                     Me.Adapter.UpdateCommand.Connection.Close
14437                 End If
14438             End Try
14439         End Function
14440         
14441         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14442          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14443          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
14444          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
14445         Public Overloads Overridable Function Update(ByVal BillDate As Global.System.Nullable(Of Date), ByVal TableNo As String, ByVal GroupName As String, ByVal GrandTotal As Global.System.Nullable(Of Decimal), ByVal OperatorID As String, ByVal BillNote As String, ByVal Status As String, ByVal Original_TicketID As Global.System.Nullable(Of Integer), ByVal Original_BillDate As Global.System.Nullable(Of Date), ByVal Original_TableNo As String, ByVal Original_GroupName As String, ByVal Original_GrandTotal As Global.System.Nullable(Of Decimal), ByVal Original_OperatorID As String, ByVal Original_BillNote As String, ByVal Original_Status As String) As Integer
14446             Return Me.Update(Original_TicketID, BillDate, TableNo, GroupName, GrandTotal, OperatorID, BillNote, Status, Original_TicketID, Original_BillDate, Original_TableNo, Original_GroupName, Original_GrandTotal, Original_OperatorID, Original_BillNote, Original_Status)
14447         End Function
14448     End Class
14449     
14450     '''<summary>
14451     '''Represents the connection and commands used to retrieve and save data.
14452     '''</summary>
14453     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
14454      Global.System.ComponentModel.ToolboxItem(true), _
14455      Global.System.ComponentModel.DataObjectAttribute(true), _
14456      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
14457         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
14458      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
14459     Partial Public Class KOTGenerationItemsTableAdapter
14460         Inherits Global.System.ComponentModel.Component
14461         
14462         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
14463         
14464         Private _connection As Global.System.Data.OleDb.OleDbConnection
14465         
14466         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
14467         
14468         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
14469         
14470         Private _clearBeforeFill As Boolean
14471         
14472         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14473          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14474         Public Sub New()
14475             MyBase.New
14476             Me.ClearBeforeFill = true
14477         End Sub
14478         
14479         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14480          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14481         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
14482             Get
14483                 If (Me._adapter Is Nothing) Then
14484                     Me.InitAdapter
14485                 End If
14486                 Return Me._adapter
14487             End Get
14488         End Property
14489         
14490         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14491          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14492         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
14493             Get
14494                 If (Me._connection Is Nothing) Then
14495                     Me.InitConnection
14496                 End If
14497                 Return Me._connection
14498             End Get
14499             Set
14500                 Me._connection = value
14501                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
14502                     Me.Adapter.InsertCommand.Connection = value
14503                 End If
14504                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
14505                     Me.Adapter.DeleteCommand.Connection = value
14506                 End If
14507                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
14508                     Me.Adapter.UpdateCommand.Connection = value
14509                 End If
14510                 Dim i As Integer = 0
14511                 Do While (i < Me.CommandCollection.Length)
14512                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
14513                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
14514                     End If
14515                     i = (i + 1)
14516                 Loop
14517             End Set
14518         End Property
14519         
14520         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14521          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14522         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
14523             Get
14524                 Return Me._transaction
14525             End Get
14526             Set
14527                 Me._transaction = value
14528                 Dim i As Integer = 0
14529                 Do While (i < Me.CommandCollection.Length)
14530                     Me.CommandCollection(i).Transaction = Me._transaction
14531                     i = (i + 1)
14532                 Loop
14533                 If ((Not (Me.Adapter) Is Nothing) _
14534                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
14535                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
14536                 End If
14537                 If ((Not (Me.Adapter) Is Nothing) _
14538                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
14539                     Me.Adapter.InsertCommand.Transaction = Me._transaction
14540                 End If
14541                 If ((Not (Me.Adapter) Is Nothing) _
14542                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
14543                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
14544                 End If
14545             End Set
14546         End Property
14547         
14548         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14549          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14550         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
14551             Get
14552                 If (Me._commandCollection Is Nothing) Then
14553                     Me.InitCommandCollection
14554                 End If
14555                 Return Me._commandCollection
14556             End Get
14557         End Property
14558         
14559         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14560          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14561         Public Property ClearBeforeFill() As Boolean
14562             Get
14563                 Return Me._clearBeforeFill
14564             End Get
14565             Set
14566                 Me._clearBeforeFill = value
14567             End Set
14568         End Property
14569         
14570         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14571          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14572         Private Sub InitAdapter()
14573             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
14574             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
14575             tableMapping.SourceTable = "Table"
14576             tableMapping.DataSetTable = "KOTGenerationItems"
14577             tableMapping.ColumnMappings.Add("KOT_ID", "KOT_ID")
14578             tableMapping.ColumnMappings.Add("Ticket_ID", "Ticket_ID")
14579             tableMapping.ColumnMappings.Add("Item_ID", "Item_ID")
14580             tableMapping.ColumnMappings.Add("Qty", "Qty")
14581             tableMapping.ColumnMappings.Add("Rate", "Rate")
14582             tableMapping.ColumnMappings.Add("Amount", "Amount")
14583             tableMapping.ColumnMappings.Add("DiscPer", "DiscPer")
14584             tableMapping.ColumnMappings.Add("Disc", "Disc")
14585             tableMapping.ColumnMappings.Add("VATPer", "VATPer")
14586             tableMapping.ColumnMappings.Add("VATAmt", "VATAmt")
14587             tableMapping.ColumnMappings.Add("STPer", "STPer")
14588             tableMapping.ColumnMappings.Add("STAmt", "STAmt")
14589             tableMapping.ColumnMappings.Add("SCPer", "SCPer")
14590             tableMapping.ColumnMappings.Add("SCAmt", "SCAmt")
14591             tableMapping.ColumnMappings.Add("TotalAmt", "TotalAmt")
14592             tableMapping.ColumnMappings.Add("ItemNote", "ItemNote")
14593             Me._adapter.TableMappings.Add(tableMapping)
14594             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
14595             Me._adapter.DeleteCommand.Connection = Me.Connection
14596             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `KOTGenerationItems` WHERE ((`KOT_ID` = ?) AND ((? = 1 AND `Ticket_ID"& _
14597                 "` IS NULL) OR (`Ticket_ID` = ?)) AND ((? = 1 AND `Item_ID` IS NULL) OR (`Item_ID"& _
14598                 "` = ?)) AND ((? = 1 AND `Qty` IS NULL) OR (`Qty` = ?)) AND ((? = 1 AND `Rate` IS"& _
14599                 " NULL) OR (`Rate` = ?)) AND ((? = 1 AND `Amount` IS NULL) OR (`Amount` = ?)) AND"& _
14600                 " ((? = 1 AND `DiscPer` IS NULL) OR (`DiscPer` = ?)) AND ((? = 1 AND `Disc` IS NU"& _
14601                 "LL) OR (`Disc` = ?)) AND ((? = 1 AND `VATPer` IS NULL) OR (`VATPer` = ?)) AND (("& _
14602                 "? = 1 AND `VATAmt` IS NULL) OR (`VATAmt` = ?)) AND ((? = 1 AND `STPer` IS NULL) "& _
14603                 "OR (`STPer` = ?)) AND ((? = 1 AND `STAmt` IS NULL) OR (`STAmt` = ?)) AND ((? = 1"& _
14604                 " AND `SCPer` IS NULL) OR (`SCPer` = ?)) AND ((? = 1 AND `SCAmt` IS NULL) OR (`SC"& _
14605                 "Amt` = ?)) AND ((? = 1 AND `TotalAmt` IS NULL) OR (`TotalAmt` = ?)) AND ((? = 1 "& _
14606                 "AND `ItemNote` IS NULL) OR (`ItemNote` = ?)))"
14607             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
14608             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_KOT_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "KOT_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
14609             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Ticket_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Ticket_ID", Global.System.Data.DataRowVersion.Original, true, Nothing))
14610             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Ticket_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Ticket_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
14611             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Original, true, Nothing))
14612             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
14613             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Qty", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Qty", Global.System.Data.DataRowVersion.Original, true, Nothing))
14614             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Qty", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Qty", Global.System.Data.DataRowVersion.Original, false, Nothing))
14615             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Rate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Rate", Global.System.Data.DataRowVersion.Original, true, Nothing))
14616             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Original, false, Nothing))
14617             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Amount", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Amount", Global.System.Data.DataRowVersion.Original, true, Nothing))
14618             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Amount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Amount", Global.System.Data.DataRowVersion.Original, false, Nothing))
14619             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_DiscPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "DiscPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
14620             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_DiscPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
14621             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Disc", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Disc", Global.System.Data.DataRowVersion.Original, true, Nothing))
14622             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Disc", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Disc", Global.System.Data.DataRowVersion.Original, false, Nothing))
14623             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VATPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VATPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
14624             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VATPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
14625             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VATAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VATAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
14626             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VATAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
14627             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_STPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
14628             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_STPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
14629             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_STAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
14630             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_STAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
14631             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SCPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SCPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
14632             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SCPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
14633             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SCAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SCAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
14634             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SCAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
14635             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TotalAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
14636             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TotalAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
14637             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ItemNote", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Original, true, Nothing))
14638             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ItemNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Original, false, Nothing))
14639             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
14640             Me._adapter.InsertCommand.Connection = Me.Connection
14641             Me._adapter.InsertCommand.CommandText = "INSERT INTO `KOTGenerationItems` (`Ticket_ID`, `Item_ID`, `Qty`, `Rate`, `Amount`"& _
14642                 ", `DiscPer`, `Disc`, `VATPer`, `VATAmt`, `STPer`, `STAmt`, `SCPer`, `SCAmt`, `To"& _
14643                 "talAmt`, `ItemNote`) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)"
14644             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
14645             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Ticket_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Ticket_ID", Global.System.Data.DataRowVersion.Current, false, Nothing))
14646             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Current, false, Nothing))
14647             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Qty", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Qty", Global.System.Data.DataRowVersion.Current, false, Nothing))
14648             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Current, false, Nothing))
14649             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Amount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Amount", Global.System.Data.DataRowVersion.Current, false, Nothing))
14650             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("DiscPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
14651             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Disc", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Disc", Global.System.Data.DataRowVersion.Current, false, Nothing))
14652             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VATPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
14653             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VATAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
14654             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("STPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
14655             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("STAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
14656             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SCPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
14657             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SCAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
14658             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TotalAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
14659             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ItemNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Current, false, Nothing))
14660             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
14661             Me._adapter.UpdateCommand.Connection = Me.Connection
14662             Me._adapter.UpdateCommand.CommandText = "UPDATE `KOTGenerationItems` SET `Ticket_ID` = ?, `Item_ID` = ?, `Qty` = ?, `Rate`"& _
14663                 " = ?, `Amount` = ?, `DiscPer` = ?, `Disc` = ?, `VATPer` = ?, `VATAmt` = ?, `STPe"& _
14664                 "r` = ?, `STAmt` = ?, `SCPer` = ?, `SCAmt` = ?, `TotalAmt` = ?, `ItemNote` = ? WH"& _
14665                 "ERE ((`KOT_ID` = ?) AND ((? = 1 AND `Ticket_ID` IS NULL) OR (`Ticket_ID` = ?)) A"& _
14666                 "ND ((? = 1 AND `Item_ID` IS NULL) OR (`Item_ID` = ?)) AND ((? = 1 AND `Qty` IS N"& _
14667                 "ULL) OR (`Qty` = ?)) AND ((? = 1 AND `Rate` IS NULL) OR (`Rate` = ?)) AND ((? = "& _
14668                 "1 AND `Amount` IS NULL) OR (`Amount` = ?)) AND ((? = 1 AND `DiscPer` IS NULL) OR"& _
14669                 " (`DiscPer` = ?)) AND ((? = 1 AND `Disc` IS NULL) OR (`Disc` = ?)) AND ((? = 1 A"& _
14670                 "ND `VATPer` IS NULL) OR (`VATPer` = ?)) AND ((? = 1 AND `VATAmt` IS NULL) OR (`V"& _
14671                 "ATAmt` = ?)) AND ((? = 1 AND `STPer` IS NULL) OR (`STPer` = ?)) AND ((? = 1 AND "& _
14672                 "`STAmt` IS NULL) OR (`STAmt` = ?)) AND ((? = 1 AND `SCPer` IS NULL) OR (`SCPer` "& _
14673                 "= ?)) AND ((? = 1 AND `SCAmt` IS NULL) OR (`SCAmt` = ?)) AND ((? = 1 AND `TotalA"& _
14674                 "mt` IS NULL) OR (`TotalAmt` = ?)) AND ((? = 1 AND `ItemNote` IS NULL) OR (`ItemN"& _
14675                 "ote` = ?)))"
14676             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
14677             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Ticket_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Ticket_ID", Global.System.Data.DataRowVersion.Current, false, Nothing))
14678             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Current, false, Nothing))
14679             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Qty", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Qty", Global.System.Data.DataRowVersion.Current, false, Nothing))
14680             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Current, false, Nothing))
14681             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Amount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Amount", Global.System.Data.DataRowVersion.Current, false, Nothing))
14682             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("DiscPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
14683             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Disc", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Disc", Global.System.Data.DataRowVersion.Current, false, Nothing))
14684             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VATPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
14685             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VATAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
14686             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("STPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
14687             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("STAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
14688             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SCPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
14689             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SCAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
14690             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TotalAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
14691             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ItemNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Current, false, Nothing))
14692             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_KOT_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "KOT_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
14693             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Ticket_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Ticket_ID", Global.System.Data.DataRowVersion.Original, true, Nothing))
14694             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Ticket_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Ticket_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
14695             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Original, true, Nothing))
14696             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
14697             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Qty", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Qty", Global.System.Data.DataRowVersion.Original, true, Nothing))
14698             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Qty", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Qty", Global.System.Data.DataRowVersion.Original, false, Nothing))
14699             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Rate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Rate", Global.System.Data.DataRowVersion.Original, true, Nothing))
14700             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Original, false, Nothing))
14701             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Amount", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Amount", Global.System.Data.DataRowVersion.Original, true, Nothing))
14702             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Amount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Amount", Global.System.Data.DataRowVersion.Original, false, Nothing))
14703             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_DiscPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "DiscPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
14704             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_DiscPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
14705             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Disc", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Disc", Global.System.Data.DataRowVersion.Original, true, Nothing))
14706             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Disc", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Disc", Global.System.Data.DataRowVersion.Original, false, Nothing))
14707             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VATPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VATPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
14708             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VATPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
14709             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VATAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VATAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
14710             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VATAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
14711             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_STPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
14712             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_STPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
14713             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_STAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
14714             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_STAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
14715             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SCPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SCPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
14716             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SCPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
14717             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SCAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SCAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
14718             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SCAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
14719             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TotalAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
14720             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TotalAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
14721             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ItemNote", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Original, true, Nothing))
14722             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ItemNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Original, false, Nothing))
14723         End Sub
14724         
14725         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14726          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14727         Private Sub InitConnection()
14728             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
14729             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
14730         End Sub
14731         
14732         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14733          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
14734         Private Sub InitCommandCollection()
14735             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
14736             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
14737             Me._commandCollection(0).Connection = Me.Connection
14738             Me._commandCollection(0).CommandText = "SELECT KOT_ID, Ticket_ID, Item_ID, Qty, Rate, Amount, DiscPer, Disc, VATPer, VATA"& _
14739                 "mt, STPer, STAmt, SCPer, SCAmt, TotalAmt, ItemNote FROM KOTGenerationItems"
14740             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
14741         End Sub
14742         
14743         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14744          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14745          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
14746          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
14747         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.KOTGenerationItemsDataTable) As Integer
14748             Me.Adapter.SelectCommand = Me.CommandCollection(0)
14749             If (Me.ClearBeforeFill = true) Then
14750                 dataTable.Clear
14751             End If
14752             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
14753             Return returnValue
14754         End Function
14755         
14756         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14757          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14758          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
14759          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
14760         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.KOTGenerationItemsDataTable
14761             Me.Adapter.SelectCommand = Me.CommandCollection(0)
14762             Dim dataTable As RPOS_DBDataSet.KOTGenerationItemsDataTable = New RPOS_DBDataSet.KOTGenerationItemsDataTable()
14763             Me.Adapter.Fill(dataTable)
14764             Return dataTable
14765         End Function
14766         
14767         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14768          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14769          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
14770         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.KOTGenerationItemsDataTable) As Integer
14771             Return Me.Adapter.Update(dataTable)
14772         End Function
14773         
14774         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14775          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14776          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
14777         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
14778             Return Me.Adapter.Update(dataSet, "KOTGenerationItems")
14779         End Function
14780         
14781         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14782          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14783          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
14784         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
14785             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
14786         End Function
14787         
14788         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14789          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14790          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
14791         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
14792             Return Me.Adapter.Update(dataRows)
14793         End Function
14794         
14795         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14796          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14797          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
14798          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
14799         Public Overloads Overridable Function Delete( _
14800                     ByVal Original_KOT_ID As Integer, _
14801                     ByVal Original_Ticket_ID As Global.System.Nullable(Of Integer), _
14802                     ByVal Original_Item_ID As Global.System.Nullable(Of Integer), _
14803                     ByVal Original_Qty As Global.System.Nullable(Of Decimal), _
14804                     ByVal Original_Rate As Global.System.Nullable(Of Decimal), _
14805                     ByVal Original_Amount As Global.System.Nullable(Of Decimal), _
14806                     ByVal Original_DiscPer As Global.System.Nullable(Of Decimal), _
14807                     ByVal Original_Disc As Global.System.Nullable(Of Decimal), _
14808                     ByVal Original_VATPer As Global.System.Nullable(Of Decimal), _
14809                     ByVal Original_VATAmt As Global.System.Nullable(Of Decimal), _
14810                     ByVal Original_STPer As Global.System.Nullable(Of Decimal), _
14811                     ByVal Original_STAmt As Global.System.Nullable(Of Decimal), _
14812                     ByVal Original_SCPer As Global.System.Nullable(Of Decimal), _
14813                     ByVal Original_SCAmt As Global.System.Nullable(Of Decimal), _
14814                     ByVal Original_TotalAmt As Global.System.Nullable(Of Decimal), _
14815                     ByVal Original_ItemNote As String) As Integer
14816             Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_KOT_ID,Integer)
14817             If (Original_Ticket_ID.HasValue = true) Then
14818                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
14819                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_Ticket_ID.Value,Integer)
14820             Else
14821                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
14822                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
14823             End If
14824             If (Original_Item_ID.HasValue = true) Then
14825                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
14826                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_Item_ID.Value,Integer)
14827             Else
14828                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
14829                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
14830             End If
14831             If (Original_Qty.HasValue = true) Then
14832                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
14833                 Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_Qty.Value,Decimal)
14834             Else
14835                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
14836                 Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
14837             End If
14838             If (Original_Rate.HasValue = true) Then
14839                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(0,Object)
14840                 Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_Rate.Value,Decimal)
14841             Else
14842                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(1,Object)
14843                 Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
14844             End If
14845             If (Original_Amount.HasValue = true) Then
14846                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(0,Object)
14847                 Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_Amount.Value,Decimal)
14848             Else
14849                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(1,Object)
14850                 Me.Adapter.DeleteCommand.Parameters(10).Value = Global.System.DBNull.Value
14851             End If
14852             If (Original_DiscPer.HasValue = true) Then
14853                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(0,Object)
14854                 Me.Adapter.DeleteCommand.Parameters(12).Value = CType(Original_DiscPer.Value,Decimal)
14855             Else
14856                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(1,Object)
14857                 Me.Adapter.DeleteCommand.Parameters(12).Value = Global.System.DBNull.Value
14858             End If
14859             If (Original_Disc.HasValue = true) Then
14860                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(0,Object)
14861                 Me.Adapter.DeleteCommand.Parameters(14).Value = CType(Original_Disc.Value,Decimal)
14862             Else
14863                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(1,Object)
14864                 Me.Adapter.DeleteCommand.Parameters(14).Value = Global.System.DBNull.Value
14865             End If
14866             If (Original_VATPer.HasValue = true) Then
14867                 Me.Adapter.DeleteCommand.Parameters(15).Value = CType(0,Object)
14868                 Me.Adapter.DeleteCommand.Parameters(16).Value = CType(Original_VATPer.Value,Decimal)
14869             Else
14870                 Me.Adapter.DeleteCommand.Parameters(15).Value = CType(1,Object)
14871                 Me.Adapter.DeleteCommand.Parameters(16).Value = Global.System.DBNull.Value
14872             End If
14873             If (Original_VATAmt.HasValue = true) Then
14874                 Me.Adapter.DeleteCommand.Parameters(17).Value = CType(0,Object)
14875                 Me.Adapter.DeleteCommand.Parameters(18).Value = CType(Original_VATAmt.Value,Decimal)
14876             Else
14877                 Me.Adapter.DeleteCommand.Parameters(17).Value = CType(1,Object)
14878                 Me.Adapter.DeleteCommand.Parameters(18).Value = Global.System.DBNull.Value
14879             End If
14880             If (Original_STPer.HasValue = true) Then
14881                 Me.Adapter.DeleteCommand.Parameters(19).Value = CType(0,Object)
14882                 Me.Adapter.DeleteCommand.Parameters(20).Value = CType(Original_STPer.Value,Decimal)
14883             Else
14884                 Me.Adapter.DeleteCommand.Parameters(19).Value = CType(1,Object)
14885                 Me.Adapter.DeleteCommand.Parameters(20).Value = Global.System.DBNull.Value
14886             End If
14887             If (Original_STAmt.HasValue = true) Then
14888                 Me.Adapter.DeleteCommand.Parameters(21).Value = CType(0,Object)
14889                 Me.Adapter.DeleteCommand.Parameters(22).Value = CType(Original_STAmt.Value,Decimal)
14890             Else
14891                 Me.Adapter.DeleteCommand.Parameters(21).Value = CType(1,Object)
14892                 Me.Adapter.DeleteCommand.Parameters(22).Value = Global.System.DBNull.Value
14893             End If
14894             If (Original_SCPer.HasValue = true) Then
14895                 Me.Adapter.DeleteCommand.Parameters(23).Value = CType(0,Object)
14896                 Me.Adapter.DeleteCommand.Parameters(24).Value = CType(Original_SCPer.Value,Decimal)
14897             Else
14898                 Me.Adapter.DeleteCommand.Parameters(23).Value = CType(1,Object)
14899                 Me.Adapter.DeleteCommand.Parameters(24).Value = Global.System.DBNull.Value
14900             End If
14901             If (Original_SCAmt.HasValue = true) Then
14902                 Me.Adapter.DeleteCommand.Parameters(25).Value = CType(0,Object)
14903                 Me.Adapter.DeleteCommand.Parameters(26).Value = CType(Original_SCAmt.Value,Decimal)
14904             Else
14905                 Me.Adapter.DeleteCommand.Parameters(25).Value = CType(1,Object)
14906                 Me.Adapter.DeleteCommand.Parameters(26).Value = Global.System.DBNull.Value
14907             End If
14908             If (Original_TotalAmt.HasValue = true) Then
14909                 Me.Adapter.DeleteCommand.Parameters(27).Value = CType(0,Object)
14910                 Me.Adapter.DeleteCommand.Parameters(28).Value = CType(Original_TotalAmt.Value,Decimal)
14911             Else
14912                 Me.Adapter.DeleteCommand.Parameters(27).Value = CType(1,Object)
14913                 Me.Adapter.DeleteCommand.Parameters(28).Value = Global.System.DBNull.Value
14914             End If
14915             If (Original_ItemNote Is Nothing) Then
14916                 Me.Adapter.DeleteCommand.Parameters(29).Value = CType(1,Object)
14917                 Me.Adapter.DeleteCommand.Parameters(30).Value = Global.System.DBNull.Value
14918             Else
14919                 Me.Adapter.DeleteCommand.Parameters(29).Value = CType(0,Object)
14920                 Me.Adapter.DeleteCommand.Parameters(30).Value = CType(Original_ItemNote,String)
14921             End If
14922             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
14923             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
14924                         <> Global.System.Data.ConnectionState.Open) Then
14925                 Me.Adapter.DeleteCommand.Connection.Open
14926             End If
14927             Try
14928                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
14929                 Return returnValue
14930             Finally
14931                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
14932                     Me.Adapter.DeleteCommand.Connection.Close
14933                 End If
14934             End Try
14935         End Function
14936         
14937         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
14938          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
14939          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
14940          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
14941         Public Overloads Overridable Function Insert(ByVal Ticket_ID As Global.System.Nullable(Of Integer), ByVal Item_ID As Global.System.Nullable(Of Integer), ByVal Qty As Global.System.Nullable(Of Decimal), ByVal Rate As Global.System.Nullable(Of Decimal), ByVal Amount As Global.System.Nullable(Of Decimal), ByVal DiscPer As Global.System.Nullable(Of Decimal), ByVal Disc As Global.System.Nullable(Of Decimal), ByVal VATPer As Global.System.Nullable(Of Decimal), ByVal VATAmt As Global.System.Nullable(Of Decimal), ByVal STPer As Global.System.Nullable(Of Decimal), ByVal STAmt As Global.System.Nullable(Of Decimal), ByVal SCPer As Global.System.Nullable(Of Decimal), ByVal SCAmt As Global.System.Nullable(Of Decimal), ByVal TotalAmt As Global.System.Nullable(Of Decimal), ByVal ItemNote As String) As Integer
14942             If (Ticket_ID.HasValue = true) Then
14943                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(Ticket_ID.Value,Integer)
14944             Else
14945                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
14946             End If
14947             If (Item_ID.HasValue = true) Then
14948                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(Item_ID.Value,Integer)
14949             Else
14950                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
14951             End If
14952             If (Qty.HasValue = true) Then
14953                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(Qty.Value,Decimal)
14954             Else
14955                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
14956             End If
14957             If (Rate.HasValue = true) Then
14958                 Me.Adapter.InsertCommand.Parameters(3).Value = CType(Rate.Value,Decimal)
14959             Else
14960                 Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
14961             End If
14962             If (Amount.HasValue = true) Then
14963                 Me.Adapter.InsertCommand.Parameters(4).Value = CType(Amount.Value,Decimal)
14964             Else
14965                 Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
14966             End If
14967             If (DiscPer.HasValue = true) Then
14968                 Me.Adapter.InsertCommand.Parameters(5).Value = CType(DiscPer.Value,Decimal)
14969             Else
14970                 Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
14971             End If
14972             If (Disc.HasValue = true) Then
14973                 Me.Adapter.InsertCommand.Parameters(6).Value = CType(Disc.Value,Decimal)
14974             Else
14975                 Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
14976             End If
14977             If (VATPer.HasValue = true) Then
14978                 Me.Adapter.InsertCommand.Parameters(7).Value = CType(VATPer.Value,Decimal)
14979             Else
14980                 Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
14981             End If
14982             If (VATAmt.HasValue = true) Then
14983                 Me.Adapter.InsertCommand.Parameters(8).Value = CType(VATAmt.Value,Decimal)
14984             Else
14985                 Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
14986             End If
14987             If (STPer.HasValue = true) Then
14988                 Me.Adapter.InsertCommand.Parameters(9).Value = CType(STPer.Value,Decimal)
14989             Else
14990                 Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
14991             End If
14992             If (STAmt.HasValue = true) Then
14993                 Me.Adapter.InsertCommand.Parameters(10).Value = CType(STAmt.Value,Decimal)
14994             Else
14995                 Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
14996             End If
14997             If (SCPer.HasValue = true) Then
14998                 Me.Adapter.InsertCommand.Parameters(11).Value = CType(SCPer.Value,Decimal)
14999             Else
15000                 Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
15001             End If
15002             If (SCAmt.HasValue = true) Then
15003                 Me.Adapter.InsertCommand.Parameters(12).Value = CType(SCAmt.Value,Decimal)
15004             Else
15005                 Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
15006             End If
15007             If (TotalAmt.HasValue = true) Then
15008                 Me.Adapter.InsertCommand.Parameters(13).Value = CType(TotalAmt.Value,Decimal)
15009             Else
15010                 Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
15011             End If
15012             If (ItemNote Is Nothing) Then
15013                 Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
15014             Else
15015                 Me.Adapter.InsertCommand.Parameters(14).Value = CType(ItemNote,String)
15016             End If
15017             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
15018             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
15019                         <> Global.System.Data.ConnectionState.Open) Then
15020                 Me.Adapter.InsertCommand.Connection.Open
15021             End If
15022             Try
15023                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
15024                 Return returnValue
15025             Finally
15026                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
15027                     Me.Adapter.InsertCommand.Connection.Close
15028                 End If
15029             End Try
15030         End Function
15031         
15032         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15033          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15034          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
15035          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
15036         Public Overloads Overridable Function Update( _
15037                     ByVal Ticket_ID As Global.System.Nullable(Of Integer), _
15038                     ByVal Item_ID As Global.System.Nullable(Of Integer), _
15039                     ByVal Qty As Global.System.Nullable(Of Decimal), _
15040                     ByVal Rate As Global.System.Nullable(Of Decimal), _
15041                     ByVal Amount As Global.System.Nullable(Of Decimal), _
15042                     ByVal DiscPer As Global.System.Nullable(Of Decimal), _
15043                     ByVal Disc As Global.System.Nullable(Of Decimal), _
15044                     ByVal VATPer As Global.System.Nullable(Of Decimal), _
15045                     ByVal VATAmt As Global.System.Nullable(Of Decimal), _
15046                     ByVal STPer As Global.System.Nullable(Of Decimal), _
15047                     ByVal STAmt As Global.System.Nullable(Of Decimal), _
15048                     ByVal SCPer As Global.System.Nullable(Of Decimal), _
15049                     ByVal SCAmt As Global.System.Nullable(Of Decimal), _
15050                     ByVal TotalAmt As Global.System.Nullable(Of Decimal), _
15051                     ByVal ItemNote As String, _
15052                     ByVal Original_KOT_ID As Integer, _
15053                     ByVal Original_Ticket_ID As Global.System.Nullable(Of Integer), _
15054                     ByVal Original_Item_ID As Global.System.Nullable(Of Integer), _
15055                     ByVal Original_Qty As Global.System.Nullable(Of Decimal), _
15056                     ByVal Original_Rate As Global.System.Nullable(Of Decimal), _
15057                     ByVal Original_Amount As Global.System.Nullable(Of Decimal), _
15058                     ByVal Original_DiscPer As Global.System.Nullable(Of Decimal), _
15059                     ByVal Original_Disc As Global.System.Nullable(Of Decimal), _
15060                     ByVal Original_VATPer As Global.System.Nullable(Of Decimal), _
15061                     ByVal Original_VATAmt As Global.System.Nullable(Of Decimal), _
15062                     ByVal Original_STPer As Global.System.Nullable(Of Decimal), _
15063                     ByVal Original_STAmt As Global.System.Nullable(Of Decimal), _
15064                     ByVal Original_SCPer As Global.System.Nullable(Of Decimal), _
15065                     ByVal Original_SCAmt As Global.System.Nullable(Of Decimal), _
15066                     ByVal Original_TotalAmt As Global.System.Nullable(Of Decimal), _
15067                     ByVal Original_ItemNote As String) As Integer
15068             If (Ticket_ID.HasValue = true) Then
15069                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(Ticket_ID.Value,Integer)
15070             Else
15071                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
15072             End If
15073             If (Item_ID.HasValue = true) Then
15074                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Item_ID.Value,Integer)
15075             Else
15076                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
15077             End If
15078             If (Qty.HasValue = true) Then
15079                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(Qty.Value,Decimal)
15080             Else
15081                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
15082             End If
15083             If (Rate.HasValue = true) Then
15084                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(Rate.Value,Decimal)
15085             Else
15086                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
15087             End If
15088             If (Amount.HasValue = true) Then
15089                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(Amount.Value,Decimal)
15090             Else
15091                 Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
15092             End If
15093             If (DiscPer.HasValue = true) Then
15094                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(DiscPer.Value,Decimal)
15095             Else
15096                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
15097             End If
15098             If (Disc.HasValue = true) Then
15099                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(Disc.Value,Decimal)
15100             Else
15101                 Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
15102             End If
15103             If (VATPer.HasValue = true) Then
15104                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(VATPer.Value,Decimal)
15105             Else
15106                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
15107             End If
15108             If (VATAmt.HasValue = true) Then
15109                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(VATAmt.Value,Decimal)
15110             Else
15111                 Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
15112             End If
15113             If (STPer.HasValue = true) Then
15114                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(STPer.Value,Decimal)
15115             Else
15116                 Me.Adapter.UpdateCommand.Parameters(9).Value = Global.System.DBNull.Value
15117             End If
15118             If (STAmt.HasValue = true) Then
15119                 Me.Adapter.UpdateCommand.Parameters(10).Value = CType(STAmt.Value,Decimal)
15120             Else
15121                 Me.Adapter.UpdateCommand.Parameters(10).Value = Global.System.DBNull.Value
15122             End If
15123             If (SCPer.HasValue = true) Then
15124                 Me.Adapter.UpdateCommand.Parameters(11).Value = CType(SCPer.Value,Decimal)
15125             Else
15126                 Me.Adapter.UpdateCommand.Parameters(11).Value = Global.System.DBNull.Value
15127             End If
15128             If (SCAmt.HasValue = true) Then
15129                 Me.Adapter.UpdateCommand.Parameters(12).Value = CType(SCAmt.Value,Decimal)
15130             Else
15131                 Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
15132             End If
15133             If (TotalAmt.HasValue = true) Then
15134                 Me.Adapter.UpdateCommand.Parameters(13).Value = CType(TotalAmt.Value,Decimal)
15135             Else
15136                 Me.Adapter.UpdateCommand.Parameters(13).Value = Global.System.DBNull.Value
15137             End If
15138             If (ItemNote Is Nothing) Then
15139                 Me.Adapter.UpdateCommand.Parameters(14).Value = Global.System.DBNull.Value
15140             Else
15141                 Me.Adapter.UpdateCommand.Parameters(14).Value = CType(ItemNote,String)
15142             End If
15143             Me.Adapter.UpdateCommand.Parameters(15).Value = CType(Original_KOT_ID,Integer)
15144             If (Original_Ticket_ID.HasValue = true) Then
15145                 Me.Adapter.UpdateCommand.Parameters(16).Value = CType(0,Object)
15146                 Me.Adapter.UpdateCommand.Parameters(17).Value = CType(Original_Ticket_ID.Value,Integer)
15147             Else
15148                 Me.Adapter.UpdateCommand.Parameters(16).Value = CType(1,Object)
15149                 Me.Adapter.UpdateCommand.Parameters(17).Value = Global.System.DBNull.Value
15150             End If
15151             If (Original_Item_ID.HasValue = true) Then
15152                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(0,Object)
15153                 Me.Adapter.UpdateCommand.Parameters(19).Value = CType(Original_Item_ID.Value,Integer)
15154             Else
15155                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(1,Object)
15156                 Me.Adapter.UpdateCommand.Parameters(19).Value = Global.System.DBNull.Value
15157             End If
15158             If (Original_Qty.HasValue = true) Then
15159                 Me.Adapter.UpdateCommand.Parameters(20).Value = CType(0,Object)
15160                 Me.Adapter.UpdateCommand.Parameters(21).Value = CType(Original_Qty.Value,Decimal)
15161             Else
15162                 Me.Adapter.UpdateCommand.Parameters(20).Value = CType(1,Object)
15163                 Me.Adapter.UpdateCommand.Parameters(21).Value = Global.System.DBNull.Value
15164             End If
15165             If (Original_Rate.HasValue = true) Then
15166                 Me.Adapter.UpdateCommand.Parameters(22).Value = CType(0,Object)
15167                 Me.Adapter.UpdateCommand.Parameters(23).Value = CType(Original_Rate.Value,Decimal)
15168             Else
15169                 Me.Adapter.UpdateCommand.Parameters(22).Value = CType(1,Object)
15170                 Me.Adapter.UpdateCommand.Parameters(23).Value = Global.System.DBNull.Value
15171             End If
15172             If (Original_Amount.HasValue = true) Then
15173                 Me.Adapter.UpdateCommand.Parameters(24).Value = CType(0,Object)
15174                 Me.Adapter.UpdateCommand.Parameters(25).Value = CType(Original_Amount.Value,Decimal)
15175             Else
15176                 Me.Adapter.UpdateCommand.Parameters(24).Value = CType(1,Object)
15177                 Me.Adapter.UpdateCommand.Parameters(25).Value = Global.System.DBNull.Value
15178             End If
15179             If (Original_DiscPer.HasValue = true) Then
15180                 Me.Adapter.UpdateCommand.Parameters(26).Value = CType(0,Object)
15181                 Me.Adapter.UpdateCommand.Parameters(27).Value = CType(Original_DiscPer.Value,Decimal)
15182             Else
15183                 Me.Adapter.UpdateCommand.Parameters(26).Value = CType(1,Object)
15184                 Me.Adapter.UpdateCommand.Parameters(27).Value = Global.System.DBNull.Value
15185             End If
15186             If (Original_Disc.HasValue = true) Then
15187                 Me.Adapter.UpdateCommand.Parameters(28).Value = CType(0,Object)
15188                 Me.Adapter.UpdateCommand.Parameters(29).Value = CType(Original_Disc.Value,Decimal)
15189             Else
15190                 Me.Adapter.UpdateCommand.Parameters(28).Value = CType(1,Object)
15191                 Me.Adapter.UpdateCommand.Parameters(29).Value = Global.System.DBNull.Value
15192             End If
15193             If (Original_VATPer.HasValue = true) Then
15194                 Me.Adapter.UpdateCommand.Parameters(30).Value = CType(0,Object)
15195                 Me.Adapter.UpdateCommand.Parameters(31).Value = CType(Original_VATPer.Value,Decimal)
15196             Else
15197                 Me.Adapter.UpdateCommand.Parameters(30).Value = CType(1,Object)
15198                 Me.Adapter.UpdateCommand.Parameters(31).Value = Global.System.DBNull.Value
15199             End If
15200             If (Original_VATAmt.HasValue = true) Then
15201                 Me.Adapter.UpdateCommand.Parameters(32).Value = CType(0,Object)
15202                 Me.Adapter.UpdateCommand.Parameters(33).Value = CType(Original_VATAmt.Value,Decimal)
15203             Else
15204                 Me.Adapter.UpdateCommand.Parameters(32).Value = CType(1,Object)
15205                 Me.Adapter.UpdateCommand.Parameters(33).Value = Global.System.DBNull.Value
15206             End If
15207             If (Original_STPer.HasValue = true) Then
15208                 Me.Adapter.UpdateCommand.Parameters(34).Value = CType(0,Object)
15209                 Me.Adapter.UpdateCommand.Parameters(35).Value = CType(Original_STPer.Value,Decimal)
15210             Else
15211                 Me.Adapter.UpdateCommand.Parameters(34).Value = CType(1,Object)
15212                 Me.Adapter.UpdateCommand.Parameters(35).Value = Global.System.DBNull.Value
15213             End If
15214             If (Original_STAmt.HasValue = true) Then
15215                 Me.Adapter.UpdateCommand.Parameters(36).Value = CType(0,Object)
15216                 Me.Adapter.UpdateCommand.Parameters(37).Value = CType(Original_STAmt.Value,Decimal)
15217             Else
15218                 Me.Adapter.UpdateCommand.Parameters(36).Value = CType(1,Object)
15219                 Me.Adapter.UpdateCommand.Parameters(37).Value = Global.System.DBNull.Value
15220             End If
15221             If (Original_SCPer.HasValue = true) Then
15222                 Me.Adapter.UpdateCommand.Parameters(38).Value = CType(0,Object)
15223                 Me.Adapter.UpdateCommand.Parameters(39).Value = CType(Original_SCPer.Value,Decimal)
15224             Else
15225                 Me.Adapter.UpdateCommand.Parameters(38).Value = CType(1,Object)
15226                 Me.Adapter.UpdateCommand.Parameters(39).Value = Global.System.DBNull.Value
15227             End If
15228             If (Original_SCAmt.HasValue = true) Then
15229                 Me.Adapter.UpdateCommand.Parameters(40).Value = CType(0,Object)
15230                 Me.Adapter.UpdateCommand.Parameters(41).Value = CType(Original_SCAmt.Value,Decimal)
15231             Else
15232                 Me.Adapter.UpdateCommand.Parameters(40).Value = CType(1,Object)
15233                 Me.Adapter.UpdateCommand.Parameters(41).Value = Global.System.DBNull.Value
15234             End If
15235             If (Original_TotalAmt.HasValue = true) Then
15236                 Me.Adapter.UpdateCommand.Parameters(42).Value = CType(0,Object)
15237                 Me.Adapter.UpdateCommand.Parameters(43).Value = CType(Original_TotalAmt.Value,Decimal)
15238             Else
15239                 Me.Adapter.UpdateCommand.Parameters(42).Value = CType(1,Object)
15240                 Me.Adapter.UpdateCommand.Parameters(43).Value = Global.System.DBNull.Value
15241             End If
15242             If (Original_ItemNote Is Nothing) Then
15243                 Me.Adapter.UpdateCommand.Parameters(44).Value = CType(1,Object)
15244                 Me.Adapter.UpdateCommand.Parameters(45).Value = Global.System.DBNull.Value
15245             Else
15246                 Me.Adapter.UpdateCommand.Parameters(44).Value = CType(0,Object)
15247                 Me.Adapter.UpdateCommand.Parameters(45).Value = CType(Original_ItemNote,String)
15248             End If
15249             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
15250             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
15251                         <> Global.System.Data.ConnectionState.Open) Then
15252                 Me.Adapter.UpdateCommand.Connection.Open
15253             End If
15254             Try
15255                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
15256                 Return returnValue
15257             Finally
15258                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
15259                     Me.Adapter.UpdateCommand.Connection.Close
15260                 End If
15261             End Try
15262         End Function
15263     End Class
15264     
15265     '''<summary>
15266     '''Represents the connection and commands used to retrieve and save data.
15267     '''</summary>
15268     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
15269      Global.System.ComponentModel.ToolboxItem(true), _
15270      Global.System.ComponentModel.DataObjectAttribute(true), _
15271      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
15272         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
15273      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
15274     Partial Public Class LogsTableAdapter
15275         Inherits Global.System.ComponentModel.Component
15276         
15277         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
15278         
15279         Private _connection As Global.System.Data.OleDb.OleDbConnection
15280         
15281         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
15282         
15283         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
15284         
15285         Private _clearBeforeFill As Boolean
15286         
15287         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15288          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15289         Public Sub New()
15290             MyBase.New
15291             Me.ClearBeforeFill = true
15292         End Sub
15293         
15294         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15295          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15296         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
15297             Get
15298                 If (Me._adapter Is Nothing) Then
15299                     Me.InitAdapter
15300                 End If
15301                 Return Me._adapter
15302             End Get
15303         End Property
15304         
15305         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15306          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15307         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
15308             Get
15309                 If (Me._connection Is Nothing) Then
15310                     Me.InitConnection
15311                 End If
15312                 Return Me._connection
15313             End Get
15314             Set
15315                 Me._connection = value
15316                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
15317                     Me.Adapter.InsertCommand.Connection = value
15318                 End If
15319                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
15320                     Me.Adapter.DeleteCommand.Connection = value
15321                 End If
15322                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
15323                     Me.Adapter.UpdateCommand.Connection = value
15324                 End If
15325                 Dim i As Integer = 0
15326                 Do While (i < Me.CommandCollection.Length)
15327                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
15328                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
15329                     End If
15330                     i = (i + 1)
15331                 Loop
15332             End Set
15333         End Property
15334         
15335         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15336          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15337         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
15338             Get
15339                 Return Me._transaction
15340             End Get
15341             Set
15342                 Me._transaction = value
15343                 Dim i As Integer = 0
15344                 Do While (i < Me.CommandCollection.Length)
15345                     Me.CommandCollection(i).Transaction = Me._transaction
15346                     i = (i + 1)
15347                 Loop
15348                 If ((Not (Me.Adapter) Is Nothing) _
15349                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
15350                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
15351                 End If
15352                 If ((Not (Me.Adapter) Is Nothing) _
15353                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
15354                     Me.Adapter.InsertCommand.Transaction = Me._transaction
15355                 End If
15356                 If ((Not (Me.Adapter) Is Nothing) _
15357                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
15358                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
15359                 End If
15360             End Set
15361         End Property
15362         
15363         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15364          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15365         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
15366             Get
15367                 If (Me._commandCollection Is Nothing) Then
15368                     Me.InitCommandCollection
15369                 End If
15370                 Return Me._commandCollection
15371             End Get
15372         End Property
15373         
15374         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15375          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15376         Public Property ClearBeforeFill() As Boolean
15377             Get
15378                 Return Me._clearBeforeFill
15379             End Get
15380             Set
15381                 Me._clearBeforeFill = value
15382             End Set
15383         End Property
15384         
15385         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15386          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15387         Private Sub InitAdapter()
15388             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
15389             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
15390             tableMapping.SourceTable = "Table"
15391             tableMapping.DataSetTable = "Logs"
15392             tableMapping.ColumnMappings.Add("ID", "ID")
15393             tableMapping.ColumnMappings.Add("UserID", "UserID")
15394             tableMapping.ColumnMappings.Add("Operation", "Operation")
15395             tableMapping.ColumnMappings.Add("Date", "Date")
15396             Me._adapter.TableMappings.Add(tableMapping)
15397             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
15398             Me._adapter.DeleteCommand.Connection = Me.Connection
15399             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `Logs` WHERE ((`ID` = ?) AND ((? = 1 AND `UserID` IS NULL) OR (`UserI"& _
15400                 "D` = ?)) AND ((? = 1 AND `Operation` IS NULL) OR (`Operation` = ?)) AND ((? = 1 "& _
15401                 "AND `Date` IS NULL) OR (`Date` = ?)))"
15402             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
15403             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
15404             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_UserID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserID", Global.System.Data.DataRowVersion.Original, true, Nothing))
15405             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_UserID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserID", Global.System.Data.DataRowVersion.Original, false, Nothing))
15406             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Operation", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Operation", Global.System.Data.DataRowVersion.Original, true, Nothing))
15407             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Operation", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Operation", Global.System.Data.DataRowVersion.Original, false, Nothing))
15408             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Date", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Date", Global.System.Data.DataRowVersion.Original, true, Nothing))
15409             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Date", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Date", Global.System.Data.DataRowVersion.Original, false, Nothing))
15410             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
15411             Me._adapter.InsertCommand.Connection = Me.Connection
15412             Me._adapter.InsertCommand.CommandText = "INSERT INTO `Logs` (`UserID`, `Operation`, `Date`) VALUES (?, ?, ?)"
15413             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
15414             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("UserID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserID", Global.System.Data.DataRowVersion.Current, false, Nothing))
15415             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Operation", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Operation", Global.System.Data.DataRowVersion.Current, false, Nothing))
15416             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Date", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Date", Global.System.Data.DataRowVersion.Current, false, Nothing))
15417             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
15418             Me._adapter.UpdateCommand.Connection = Me.Connection
15419             Me._adapter.UpdateCommand.CommandText = "UPDATE `Logs` SET `UserID` = ?, `Operation` = ?, `Date` = ? WHERE ((`ID` = ?) AND"& _
15420                 " ((? = 1 AND `UserID` IS NULL) OR (`UserID` = ?)) AND ((? = 1 AND `Operation` IS"& _
15421                 " NULL) OR (`Operation` = ?)) AND ((? = 1 AND `Date` IS NULL) OR (`Date` = ?)))"
15422             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
15423             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("UserID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserID", Global.System.Data.DataRowVersion.Current, false, Nothing))
15424             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Operation", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Operation", Global.System.Data.DataRowVersion.Current, false, Nothing))
15425             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Date", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Date", Global.System.Data.DataRowVersion.Current, false, Nothing))
15426             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
15427             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_UserID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserID", Global.System.Data.DataRowVersion.Original, true, Nothing))
15428             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_UserID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserID", Global.System.Data.DataRowVersion.Original, false, Nothing))
15429             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Operation", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Operation", Global.System.Data.DataRowVersion.Original, true, Nothing))
15430             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Operation", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Operation", Global.System.Data.DataRowVersion.Original, false, Nothing))
15431             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Date", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Date", Global.System.Data.DataRowVersion.Original, true, Nothing))
15432             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Date", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Date", Global.System.Data.DataRowVersion.Original, false, Nothing))
15433         End Sub
15434         
15435         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15436          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15437         Private Sub InitConnection()
15438             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
15439             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
15440         End Sub
15441         
15442         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15443          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15444         Private Sub InitCommandCollection()
15445             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
15446             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
15447             Me._commandCollection(0).Connection = Me.Connection
15448             Me._commandCollection(0).CommandText = "SELECT ID, UserID, Operation, [Date] FROM Logs"
15449             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
15450         End Sub
15451         
15452         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15453          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15454          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
15455          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
15456         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.LogsDataTable) As Integer
15457             Me.Adapter.SelectCommand = Me.CommandCollection(0)
15458             If (Me.ClearBeforeFill = true) Then
15459                 dataTable.Clear
15460             End If
15461             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
15462             Return returnValue
15463         End Function
15464         
15465         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15466          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15467          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
15468          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
15469         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.LogsDataTable
15470             Me.Adapter.SelectCommand = Me.CommandCollection(0)
15471             Dim dataTable As RPOS_DBDataSet.LogsDataTable = New RPOS_DBDataSet.LogsDataTable()
15472             Me.Adapter.Fill(dataTable)
15473             Return dataTable
15474         End Function
15475         
15476         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15477          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15478          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
15479         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.LogsDataTable) As Integer
15480             Return Me.Adapter.Update(dataTable)
15481         End Function
15482         
15483         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15484          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15485          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
15486         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
15487             Return Me.Adapter.Update(dataSet, "Logs")
15488         End Function
15489         
15490         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15491          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15492          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
15493         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
15494             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
15495         End Function
15496         
15497         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15498          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15499          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
15500         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
15501             Return Me.Adapter.Update(dataRows)
15502         End Function
15503         
15504         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15505          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15506          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
15507          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
15508         Public Overloads Overridable Function Delete(ByVal Original_ID As Integer, ByVal Original_UserID As String, ByVal Original_Operation As String, ByVal Original_Date As Global.System.Nullable(Of Date)) As Integer
15509             Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_ID,Integer)
15510             If (Original_UserID Is Nothing) Then
15511                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
15512                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
15513             Else
15514                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
15515                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_UserID,String)
15516             End If
15517             If (Original_Operation Is Nothing) Then
15518                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
15519                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
15520             Else
15521                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
15522                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_Operation,String)
15523             End If
15524             If (Original_Date.HasValue = true) Then
15525                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
15526                 Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_Date.Value,Date)
15527             Else
15528                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
15529                 Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
15530             End If
15531             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
15532             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
15533                         <> Global.System.Data.ConnectionState.Open) Then
15534                 Me.Adapter.DeleteCommand.Connection.Open
15535             End If
15536             Try
15537                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
15538                 Return returnValue
15539             Finally
15540                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
15541                     Me.Adapter.DeleteCommand.Connection.Close
15542                 End If
15543             End Try
15544         End Function
15545         
15546         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15547          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15548          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
15549          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
15550         Public Overloads Overridable Function Insert(ByVal UserID As String, ByVal Operation As String, ByVal _Date As Global.System.Nullable(Of Date)) As Integer
15551             If (UserID Is Nothing) Then
15552                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
15553             Else
15554                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(UserID,String)
15555             End If
15556             If (Operation Is Nothing) Then
15557                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
15558             Else
15559                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(Operation,String)
15560             End If
15561             If (_Date.HasValue = true) Then
15562                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(_Date.Value,Date)
15563             Else
15564                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
15565             End If
15566             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
15567             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
15568                         <> Global.System.Data.ConnectionState.Open) Then
15569                 Me.Adapter.InsertCommand.Connection.Open
15570             End If
15571             Try
15572                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
15573                 Return returnValue
15574             Finally
15575                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
15576                     Me.Adapter.InsertCommand.Connection.Close
15577                 End If
15578             End Try
15579         End Function
15580         
15581         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15582          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15583          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
15584          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
15585         Public Overloads Overridable Function Update(ByVal UserID As String, ByVal Operation As String, ByVal _Date As Global.System.Nullable(Of Date), ByVal Original_ID As Integer, ByVal Original_UserID As String, ByVal Original_Operation As String, ByVal Original_Date As Global.System.Nullable(Of Date)) As Integer
15586             If (UserID Is Nothing) Then
15587                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
15588             Else
15589                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(UserID,String)
15590             End If
15591             If (Operation Is Nothing) Then
15592                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
15593             Else
15594                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Operation,String)
15595             End If
15596             If (_Date.HasValue = true) Then
15597                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(_Date.Value,Date)
15598             Else
15599                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
15600             End If
15601             Me.Adapter.UpdateCommand.Parameters(3).Value = CType(Original_ID,Integer)
15602             If (Original_UserID Is Nothing) Then
15603                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(1,Object)
15604                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
15605             Else
15606                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(0,Object)
15607                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(Original_UserID,String)
15608             End If
15609             If (Original_Operation Is Nothing) Then
15610                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(1,Object)
15611                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
15612             Else
15613                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(0,Object)
15614                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(Original_Operation,String)
15615             End If
15616             If (Original_Date.HasValue = true) Then
15617                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(0,Object)
15618                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(Original_Date.Value,Date)
15619             Else
15620                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(1,Object)
15621                 Me.Adapter.UpdateCommand.Parameters(9).Value = Global.System.DBNull.Value
15622             End If
15623             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
15624             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
15625                         <> Global.System.Data.ConnectionState.Open) Then
15626                 Me.Adapter.UpdateCommand.Connection.Open
15627             End If
15628             Try
15629                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
15630                 Return returnValue
15631             Finally
15632                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
15633                     Me.Adapter.UpdateCommand.Connection.Close
15634                 End If
15635             End Try
15636         End Function
15637     End Class
15638     
15639     '''<summary>
15640     '''Represents the connection and commands used to retrieve and save data.
15641     '''</summary>
15642     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
15643      Global.System.ComponentModel.ToolboxItem(true), _
15644      Global.System.ComponentModel.DataObjectAttribute(true), _
15645      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
15646         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
15647      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
15648     Partial Public Class NotesMasterTableAdapter
15649         Inherits Global.System.ComponentModel.Component
15650         
15651         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
15652         
15653         Private _connection As Global.System.Data.OleDb.OleDbConnection
15654         
15655         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
15656         
15657         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
15658         
15659         Private _clearBeforeFill As Boolean
15660         
15661         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15662          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15663         Public Sub New()
15664             MyBase.New
15665             Me.ClearBeforeFill = true
15666         End Sub
15667         
15668         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15669          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15670         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
15671             Get
15672                 If (Me._adapter Is Nothing) Then
15673                     Me.InitAdapter
15674                 End If
15675                 Return Me._adapter
15676             End Get
15677         End Property
15678         
15679         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15680          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15681         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
15682             Get
15683                 If (Me._connection Is Nothing) Then
15684                     Me.InitConnection
15685                 End If
15686                 Return Me._connection
15687             End Get
15688             Set
15689                 Me._connection = value
15690                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
15691                     Me.Adapter.InsertCommand.Connection = value
15692                 End If
15693                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
15694                     Me.Adapter.DeleteCommand.Connection = value
15695                 End If
15696                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
15697                     Me.Adapter.UpdateCommand.Connection = value
15698                 End If
15699                 Dim i As Integer = 0
15700                 Do While (i < Me.CommandCollection.Length)
15701                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
15702                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
15703                     End If
15704                     i = (i + 1)
15705                 Loop
15706             End Set
15707         End Property
15708         
15709         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15710          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15711         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
15712             Get
15713                 Return Me._transaction
15714             End Get
15715             Set
15716                 Me._transaction = value
15717                 Dim i As Integer = 0
15718                 Do While (i < Me.CommandCollection.Length)
15719                     Me.CommandCollection(i).Transaction = Me._transaction
15720                     i = (i + 1)
15721                 Loop
15722                 If ((Not (Me.Adapter) Is Nothing) _
15723                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
15724                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
15725                 End If
15726                 If ((Not (Me.Adapter) Is Nothing) _
15727                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
15728                     Me.Adapter.InsertCommand.Transaction = Me._transaction
15729                 End If
15730                 If ((Not (Me.Adapter) Is Nothing) _
15731                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
15732                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
15733                 End If
15734             End Set
15735         End Property
15736         
15737         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15738          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15739         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
15740             Get
15741                 If (Me._commandCollection Is Nothing) Then
15742                     Me.InitCommandCollection
15743                 End If
15744                 Return Me._commandCollection
15745             End Get
15746         End Property
15747         
15748         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15749          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15750         Public Property ClearBeforeFill() As Boolean
15751             Get
15752                 Return Me._clearBeforeFill
15753             End Get
15754             Set
15755                 Me._clearBeforeFill = value
15756             End Set
15757         End Property
15758         
15759         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15760          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15761         Private Sub InitAdapter()
15762             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
15763             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
15764             tableMapping.SourceTable = "Table"
15765             tableMapping.DataSetTable = "NotesMaster"
15766             tableMapping.ColumnMappings.Add("Id", "Id")
15767             tableMapping.ColumnMappings.Add("Notes", "Notes")
15768             Me._adapter.TableMappings.Add(tableMapping)
15769             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
15770             Me._adapter.DeleteCommand.Connection = Me.Connection
15771             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `NotesMaster` WHERE ((`Id` = ?) AND ((? = 1 AND `Notes` IS NULL) OR ("& _
15772                 "`Notes` = ?)))"
15773             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
15774             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Id", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Id", Global.System.Data.DataRowVersion.Original, false, Nothing))
15775             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Notes", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Notes", Global.System.Data.DataRowVersion.Original, true, Nothing))
15776             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Notes", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Notes", Global.System.Data.DataRowVersion.Original, false, Nothing))
15777             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
15778             Me._adapter.InsertCommand.Connection = Me.Connection
15779             Me._adapter.InsertCommand.CommandText = "INSERT INTO `NotesMaster` (`Notes`) VALUES (?)"
15780             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
15781             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Notes", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Notes", Global.System.Data.DataRowVersion.Current, false, Nothing))
15782             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
15783             Me._adapter.UpdateCommand.Connection = Me.Connection
15784             Me._adapter.UpdateCommand.CommandText = "UPDATE `NotesMaster` SET `Notes` = ? WHERE ((`Id` = ?) AND ((? = 1 AND `Notes` IS"& _
15785                 " NULL) OR (`Notes` = ?)))"
15786             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
15787             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Notes", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Notes", Global.System.Data.DataRowVersion.Current, false, Nothing))
15788             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Id", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Id", Global.System.Data.DataRowVersion.Original, false, Nothing))
15789             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Notes", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Notes", Global.System.Data.DataRowVersion.Original, true, Nothing))
15790             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Notes", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Notes", Global.System.Data.DataRowVersion.Original, false, Nothing))
15791         End Sub
15792         
15793         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15794          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15795         Private Sub InitConnection()
15796             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
15797             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
15798         End Sub
15799         
15800         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15801          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15802         Private Sub InitCommandCollection()
15803             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
15804             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
15805             Me._commandCollection(0).Connection = Me.Connection
15806             Me._commandCollection(0).CommandText = "SELECT Id, Notes FROM NotesMaster"
15807             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
15808         End Sub
15809         
15810         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15811          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15812          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
15813          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
15814         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.NotesMasterDataTable) As Integer
15815             Me.Adapter.SelectCommand = Me.CommandCollection(0)
15816             If (Me.ClearBeforeFill = true) Then
15817                 dataTable.Clear
15818             End If
15819             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
15820             Return returnValue
15821         End Function
15822         
15823         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15824          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15825          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
15826          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
15827         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.NotesMasterDataTable
15828             Me.Adapter.SelectCommand = Me.CommandCollection(0)
15829             Dim dataTable As RPOS_DBDataSet.NotesMasterDataTable = New RPOS_DBDataSet.NotesMasterDataTable()
15830             Me.Adapter.Fill(dataTable)
15831             Return dataTable
15832         End Function
15833         
15834         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15835          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15836          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
15837         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.NotesMasterDataTable) As Integer
15838             Return Me.Adapter.Update(dataTable)
15839         End Function
15840         
15841         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15842          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15843          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
15844         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
15845             Return Me.Adapter.Update(dataSet, "NotesMaster")
15846         End Function
15847         
15848         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15849          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15850          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
15851         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
15852             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
15853         End Function
15854         
15855         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15856          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15857          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
15858         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
15859             Return Me.Adapter.Update(dataRows)
15860         End Function
15861         
15862         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15863          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15864          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
15865          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
15866         Public Overloads Overridable Function Delete(ByVal Original_Id As Integer, ByVal Original_Notes As String) As Integer
15867             Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_Id,Integer)
15868             If (Original_Notes Is Nothing) Then
15869                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
15870                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
15871             Else
15872                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
15873                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_Notes,String)
15874             End If
15875             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
15876             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
15877                         <> Global.System.Data.ConnectionState.Open) Then
15878                 Me.Adapter.DeleteCommand.Connection.Open
15879             End If
15880             Try
15881                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
15882                 Return returnValue
15883             Finally
15884                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
15885                     Me.Adapter.DeleteCommand.Connection.Close
15886                 End If
15887             End Try
15888         End Function
15889         
15890         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15891          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15892          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
15893          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
15894         Public Overloads Overridable Function Insert(ByVal Notes As String) As Integer
15895             If (Notes Is Nothing) Then
15896                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
15897             Else
15898                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(Notes,String)
15899             End If
15900             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
15901             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
15902                         <> Global.System.Data.ConnectionState.Open) Then
15903                 Me.Adapter.InsertCommand.Connection.Open
15904             End If
15905             Try
15906                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
15907                 Return returnValue
15908             Finally
15909                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
15910                     Me.Adapter.InsertCommand.Connection.Close
15911                 End If
15912             End Try
15913         End Function
15914         
15915         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15916          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
15917          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
15918          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
15919         Public Overloads Overridable Function Update(ByVal Notes As String, ByVal Original_Id As Integer, ByVal Original_Notes As String) As Integer
15920             If (Notes Is Nothing) Then
15921                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
15922             Else
15923                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(Notes,String)
15924             End If
15925             Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Original_Id,Integer)
15926             If (Original_Notes Is Nothing) Then
15927                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(1,Object)
15928                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
15929             Else
15930                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(0,Object)
15931                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(Original_Notes,String)
15932             End If
15933             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
15934             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
15935                         <> Global.System.Data.ConnectionState.Open) Then
15936                 Me.Adapter.UpdateCommand.Connection.Open
15937             End If
15938             Try
15939                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
15940                 Return returnValue
15941             Finally
15942                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
15943                     Me.Adapter.UpdateCommand.Connection.Close
15944                 End If
15945             End Try
15946         End Function
15947     End Class
15948     
15949     '''<summary>
15950     '''Represents the connection and commands used to retrieve and save data.
15951     '''</summary>
15952     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
15953      Global.System.ComponentModel.ToolboxItem(true), _
15954      Global.System.ComponentModel.DataObjectAttribute(true), _
15955      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
15956         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
15957      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
15958     Partial Public Class POSGroupingTableAdapter
15959         Inherits Global.System.ComponentModel.Component
15960         
15961         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
15962         
15963         Private _connection As Global.System.Data.OleDb.OleDbConnection
15964         
15965         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
15966         
15967         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
15968         
15969         Private _clearBeforeFill As Boolean
15970         
15971         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15972          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15973         Public Sub New()
15974             MyBase.New
15975             Me.ClearBeforeFill = true
15976         End Sub
15977         
15978         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15979          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15980         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
15981             Get
15982                 If (Me._adapter Is Nothing) Then
15983                     Me.InitAdapter
15984                 End If
15985                 Return Me._adapter
15986             End Get
15987         End Property
15988         
15989         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
15990          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
15991         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
15992             Get
15993                 If (Me._connection Is Nothing) Then
15994                     Me.InitConnection
15995                 End If
15996                 Return Me._connection
15997             End Get
15998             Set
15999                 Me._connection = value
16000                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
16001                     Me.Adapter.InsertCommand.Connection = value
16002                 End If
16003                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
16004                     Me.Adapter.DeleteCommand.Connection = value
16005                 End If
16006                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
16007                     Me.Adapter.UpdateCommand.Connection = value
16008                 End If
16009                 Dim i As Integer = 0
16010                 Do While (i < Me.CommandCollection.Length)
16011                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
16012                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
16013                     End If
16014                     i = (i + 1)
16015                 Loop
16016             End Set
16017         End Property
16018         
16019         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16020          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16021         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
16022             Get
16023                 Return Me._transaction
16024             End Get
16025             Set
16026                 Me._transaction = value
16027                 Dim i As Integer = 0
16028                 Do While (i < Me.CommandCollection.Length)
16029                     Me.CommandCollection(i).Transaction = Me._transaction
16030                     i = (i + 1)
16031                 Loop
16032                 If ((Not (Me.Adapter) Is Nothing) _
16033                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
16034                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
16035                 End If
16036                 If ((Not (Me.Adapter) Is Nothing) _
16037                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
16038                     Me.Adapter.InsertCommand.Transaction = Me._transaction
16039                 End If
16040                 If ((Not (Me.Adapter) Is Nothing) _
16041                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
16042                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
16043                 End If
16044             End Set
16045         End Property
16046         
16047         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16048          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16049         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
16050             Get
16051                 If (Me._commandCollection Is Nothing) Then
16052                     Me.InitCommandCollection
16053                 End If
16054                 Return Me._commandCollection
16055             End Get
16056         End Property
16057         
16058         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16059          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16060         Public Property ClearBeforeFill() As Boolean
16061             Get
16062                 Return Me._clearBeforeFill
16063             End Get
16064             Set
16065                 Me._clearBeforeFill = value
16066             End Set
16067         End Property
16068         
16069         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16070          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16071         Private Sub InitAdapter()
16072             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
16073             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
16074             tableMapping.SourceTable = "Table"
16075             tableMapping.DataSetTable = "POSGrouping"
16076             tableMapping.ColumnMappings.Add("Id", "Id")
16077             tableMapping.ColumnMappings.Add("Col1", "Col1")
16078             tableMapping.ColumnMappings.Add("Col2", "Col2")
16079             tableMapping.ColumnMappings.Add("Col3", "Col3")
16080             tableMapping.ColumnMappings.Add("Col4", "Col4")
16081             tableMapping.ColumnMappings.Add("Col5", "Col5")
16082             tableMapping.ColumnMappings.Add("Col6", "Col6")
16083             tableMapping.ColumnMappings.Add("Col7", "Col7")
16084             tableMapping.ColumnMappings.Add("Col8", "Col8")
16085             tableMapping.ColumnMappings.Add("Col9", "Col9")
16086             tableMapping.ColumnMappings.Add("Col10", "Col10")
16087             tableMapping.ColumnMappings.Add("Col11", "Col11")
16088             tableMapping.ColumnMappings.Add("Col12", "Col12")
16089             tableMapping.ColumnMappings.Add("Col13", "Col13")
16090             tableMapping.ColumnMappings.Add("Col14", "Col14")
16091             tableMapping.ColumnMappings.Add("Col15", "Col15")
16092             Me._adapter.TableMappings.Add(tableMapping)
16093             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
16094             Me._adapter.DeleteCommand.Connection = Me.Connection
16095             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `POSGrouping` WHERE ((`Id` = ?) AND ((? = 1 AND `Col1` IS NULL) OR (`"& _
16096                 "Col1` = ?)) AND ((? = 1 AND `Col2` IS NULL) OR (`Col2` = ?)) AND ((? = 1 AND `Co"& _
16097                 "l3` IS NULL) OR (`Col3` = ?)) AND ((? = 1 AND `Col4` IS NULL) OR (`Col4` = ?)) A"& _
16098                 "ND ((? = 1 AND `Col5` IS NULL) OR (`Col5` = ?)) AND ((? = 1 AND `Col6` IS NULL) "& _
16099                 "OR (`Col6` = ?)) AND ((? = 1 AND `Col7` IS NULL) OR (`Col7` = ?)) AND ((? = 1 AN"& _
16100                 "D `Col8` IS NULL) OR (`Col8` = ?)) AND ((? = 1 AND `Col9` IS NULL) OR (`Col9` = "& _
16101                 "?)) AND ((? = 1 AND `Col10` IS NULL) OR (`Col10` = ?)) AND ((? = 1 AND `Col11` I"& _
16102                 "S NULL) OR (`Col11` = ?)) AND ((? = 1 AND `Col12` IS NULL) OR (`Col12` = ?)) AND"& _
16103                 " ((? = 1 AND `Col13` IS NULL) OR (`Col13` = ?)) AND ((? = 1 AND `Col14` IS NULL)"& _
16104                 " OR (`Col14` = ?)) AND ((? = 1 AND `Col15` IS NULL) OR (`Col15` = ?)))"
16105             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
16106             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Id", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Id", Global.System.Data.DataRowVersion.Original, false, Nothing))
16107             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col1", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col1", Global.System.Data.DataRowVersion.Original, true, Nothing))
16108             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col1", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col1", Global.System.Data.DataRowVersion.Original, false, Nothing))
16109             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col2", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col2", Global.System.Data.DataRowVersion.Original, true, Nothing))
16110             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col2", Global.System.Data.DataRowVersion.Original, false, Nothing))
16111             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col3", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col3", Global.System.Data.DataRowVersion.Original, true, Nothing))
16112             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col3", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col3", Global.System.Data.DataRowVersion.Original, false, Nothing))
16113             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col4", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col4", Global.System.Data.DataRowVersion.Original, true, Nothing))
16114             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col4", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col4", Global.System.Data.DataRowVersion.Original, false, Nothing))
16115             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col5", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col5", Global.System.Data.DataRowVersion.Original, true, Nothing))
16116             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col5", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col5", Global.System.Data.DataRowVersion.Original, false, Nothing))
16117             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col6", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col6", Global.System.Data.DataRowVersion.Original, true, Nothing))
16118             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col6", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col6", Global.System.Data.DataRowVersion.Original, false, Nothing))
16119             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col7", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col7", Global.System.Data.DataRowVersion.Original, true, Nothing))
16120             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col7", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col7", Global.System.Data.DataRowVersion.Original, false, Nothing))
16121             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col8", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col8", Global.System.Data.DataRowVersion.Original, true, Nothing))
16122             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col8", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col8", Global.System.Data.DataRowVersion.Original, false, Nothing))
16123             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col9", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col9", Global.System.Data.DataRowVersion.Original, true, Nothing))
16124             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col9", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col9", Global.System.Data.DataRowVersion.Original, false, Nothing))
16125             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col10", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col10", Global.System.Data.DataRowVersion.Original, true, Nothing))
16126             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col10", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col10", Global.System.Data.DataRowVersion.Original, false, Nothing))
16127             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col11", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col11", Global.System.Data.DataRowVersion.Original, true, Nothing))
16128             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col11", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col11", Global.System.Data.DataRowVersion.Original, false, Nothing))
16129             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col12", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col12", Global.System.Data.DataRowVersion.Original, true, Nothing))
16130             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col12", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col12", Global.System.Data.DataRowVersion.Original, false, Nothing))
16131             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col13", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col13", Global.System.Data.DataRowVersion.Original, true, Nothing))
16132             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col13", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col13", Global.System.Data.DataRowVersion.Original, false, Nothing))
16133             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col14", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col14", Global.System.Data.DataRowVersion.Original, true, Nothing))
16134             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col14", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col14", Global.System.Data.DataRowVersion.Original, false, Nothing))
16135             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col15", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col15", Global.System.Data.DataRowVersion.Original, true, Nothing))
16136             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col15", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col15", Global.System.Data.DataRowVersion.Original, false, Nothing))
16137             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
16138             Me._adapter.InsertCommand.Connection = Me.Connection
16139             Me._adapter.InsertCommand.CommandText = "INSERT INTO `POSGrouping` (`Col1`, `Col2`, `Col3`, `Col4`, `Col5`, `Col6`, `Col7`"& _
16140                 ", `Col8`, `Col9`, `Col10`, `Col11`, `Col12`, `Col13`, `Col14`, `Col15`) VALUES ("& _
16141                 "?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)"
16142             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
16143             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col1", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col1", Global.System.Data.DataRowVersion.Current, false, Nothing))
16144             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col2", Global.System.Data.DataRowVersion.Current, false, Nothing))
16145             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col3", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col3", Global.System.Data.DataRowVersion.Current, false, Nothing))
16146             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col4", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col4", Global.System.Data.DataRowVersion.Current, false, Nothing))
16147             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col5", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col5", Global.System.Data.DataRowVersion.Current, false, Nothing))
16148             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col6", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col6", Global.System.Data.DataRowVersion.Current, false, Nothing))
16149             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col7", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col7", Global.System.Data.DataRowVersion.Current, false, Nothing))
16150             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col8", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col8", Global.System.Data.DataRowVersion.Current, false, Nothing))
16151             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col9", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col9", Global.System.Data.DataRowVersion.Current, false, Nothing))
16152             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col10", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col10", Global.System.Data.DataRowVersion.Current, false, Nothing))
16153             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col11", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col11", Global.System.Data.DataRowVersion.Current, false, Nothing))
16154             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col12", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col12", Global.System.Data.DataRowVersion.Current, false, Nothing))
16155             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col13", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col13", Global.System.Data.DataRowVersion.Current, false, Nothing))
16156             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col14", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col14", Global.System.Data.DataRowVersion.Current, false, Nothing))
16157             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col15", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col15", Global.System.Data.DataRowVersion.Current, false, Nothing))
16158             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
16159             Me._adapter.UpdateCommand.Connection = Me.Connection
16160             Me._adapter.UpdateCommand.CommandText = "UPDATE `POSGrouping` SET `Col1` = ?, `Col2` = ?, `Col3` = ?, `Col4` = ?, `Col5` ="& _
16161                 " ?, `Col6` = ?, `Col7` = ?, `Col8` = ?, `Col9` = ?, `Col10` = ?, `Col11` = ?, `C"& _
16162                 "ol12` = ?, `Col13` = ?, `Col14` = ?, `Col15` = ? WHERE ((`Id` = ?) AND ((? = 1 A"& _
16163                 "ND `Col1` IS NULL) OR (`Col1` = ?)) AND ((? = 1 AND `Col2` IS NULL) OR (`Col2` ="& _
16164                 " ?)) AND ((? = 1 AND `Col3` IS NULL) OR (`Col3` = ?)) AND ((? = 1 AND `Col4` IS "& _
16165                 "NULL) OR (`Col4` = ?)) AND ((? = 1 AND `Col5` IS NULL) OR (`Col5` = ?)) AND ((? "& _
16166                 "= 1 AND `Col6` IS NULL) OR (`Col6` = ?)) AND ((? = 1 AND `Col7` IS NULL) OR (`Co"& _
16167                 "l7` = ?)) AND ((? = 1 AND `Col8` IS NULL) OR (`Col8` = ?)) AND ((? = 1 AND `Col9"& _
16168                 "` IS NULL) OR (`Col9` = ?)) AND ((? = 1 AND `Col10` IS NULL) OR (`Col10` = ?)) A"& _
16169                 "ND ((? = 1 AND `Col11` IS NULL) OR (`Col11` = ?)) AND ((? = 1 AND `Col12` IS NUL"& _
16170                 "L) OR (`Col12` = ?)) AND ((? = 1 AND `Col13` IS NULL) OR (`Col13` = ?)) AND ((? "& _
16171                 "= 1 AND `Col14` IS NULL) OR (`Col14` = ?)) AND ((? = 1 AND `Col15` IS NULL) OR ("& _
16172                 "`Col15` = ?)))"
16173             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
16174             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col1", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col1", Global.System.Data.DataRowVersion.Current, false, Nothing))
16175             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col2", Global.System.Data.DataRowVersion.Current, false, Nothing))
16176             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col3", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col3", Global.System.Data.DataRowVersion.Current, false, Nothing))
16177             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col4", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col4", Global.System.Data.DataRowVersion.Current, false, Nothing))
16178             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col5", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col5", Global.System.Data.DataRowVersion.Current, false, Nothing))
16179             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col6", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col6", Global.System.Data.DataRowVersion.Current, false, Nothing))
16180             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col7", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col7", Global.System.Data.DataRowVersion.Current, false, Nothing))
16181             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col8", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col8", Global.System.Data.DataRowVersion.Current, false, Nothing))
16182             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col9", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col9", Global.System.Data.DataRowVersion.Current, false, Nothing))
16183             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col10", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col10", Global.System.Data.DataRowVersion.Current, false, Nothing))
16184             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col11", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col11", Global.System.Data.DataRowVersion.Current, false, Nothing))
16185             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col12", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col12", Global.System.Data.DataRowVersion.Current, false, Nothing))
16186             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col13", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col13", Global.System.Data.DataRowVersion.Current, false, Nothing))
16187             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col14", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col14", Global.System.Data.DataRowVersion.Current, false, Nothing))
16188             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Col15", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col15", Global.System.Data.DataRowVersion.Current, false, Nothing))
16189             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Id", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Id", Global.System.Data.DataRowVersion.Original, false, Nothing))
16190             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col1", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col1", Global.System.Data.DataRowVersion.Original, true, Nothing))
16191             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col1", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col1", Global.System.Data.DataRowVersion.Original, false, Nothing))
16192             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col2", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col2", Global.System.Data.DataRowVersion.Original, true, Nothing))
16193             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col2", Global.System.Data.DataRowVersion.Original, false, Nothing))
16194             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col3", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col3", Global.System.Data.DataRowVersion.Original, true, Nothing))
16195             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col3", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col3", Global.System.Data.DataRowVersion.Original, false, Nothing))
16196             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col4", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col4", Global.System.Data.DataRowVersion.Original, true, Nothing))
16197             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col4", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col4", Global.System.Data.DataRowVersion.Original, false, Nothing))
16198             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col5", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col5", Global.System.Data.DataRowVersion.Original, true, Nothing))
16199             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col5", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col5", Global.System.Data.DataRowVersion.Original, false, Nothing))
16200             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col6", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col6", Global.System.Data.DataRowVersion.Original, true, Nothing))
16201             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col6", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col6", Global.System.Data.DataRowVersion.Original, false, Nothing))
16202             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col7", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col7", Global.System.Data.DataRowVersion.Original, true, Nothing))
16203             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col7", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col7", Global.System.Data.DataRowVersion.Original, false, Nothing))
16204             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col8", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col8", Global.System.Data.DataRowVersion.Original, true, Nothing))
16205             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col8", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col8", Global.System.Data.DataRowVersion.Original, false, Nothing))
16206             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col9", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col9", Global.System.Data.DataRowVersion.Original, true, Nothing))
16207             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col9", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col9", Global.System.Data.DataRowVersion.Original, false, Nothing))
16208             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col10", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col10", Global.System.Data.DataRowVersion.Original, true, Nothing))
16209             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col10", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col10", Global.System.Data.DataRowVersion.Original, false, Nothing))
16210             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col11", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col11", Global.System.Data.DataRowVersion.Original, true, Nothing))
16211             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col11", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col11", Global.System.Data.DataRowVersion.Original, false, Nothing))
16212             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col12", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col12", Global.System.Data.DataRowVersion.Original, true, Nothing))
16213             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col12", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col12", Global.System.Data.DataRowVersion.Original, false, Nothing))
16214             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col13", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col13", Global.System.Data.DataRowVersion.Original, true, Nothing))
16215             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col13", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col13", Global.System.Data.DataRowVersion.Original, false, Nothing))
16216             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col14", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col14", Global.System.Data.DataRowVersion.Original, true, Nothing))
16217             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col14", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Col14", Global.System.Data.DataRowVersion.Original, false, Nothing))
16218             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Col15", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col15", Global.System.Data.DataRowVersion.Original, true, Nothing))
16219             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Col15", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Col15", Global.System.Data.DataRowVersion.Original, false, Nothing))
16220         End Sub
16221         
16222         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16223          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16224         Private Sub InitConnection()
16225             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
16226             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
16227         End Sub
16228         
16229         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16230          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16231         Private Sub InitCommandCollection()
16232             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
16233             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
16234             Me._commandCollection(0).Connection = Me.Connection
16235             Me._commandCollection(0).CommandText = "SELECT Id, Col1, Col2, Col3, Col4, Col5, Col6, Col7, Col8, Col9, Col10, Col11, Co"& _
16236                 "l12, Col13, Col14, Col15 FROM POSGrouping"
16237             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
16238         End Sub
16239         
16240         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16241          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16242          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
16243          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
16244         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.POSGroupingDataTable) As Integer
16245             Me.Adapter.SelectCommand = Me.CommandCollection(0)
16246             If (Me.ClearBeforeFill = true) Then
16247                 dataTable.Clear
16248             End If
16249             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
16250             Return returnValue
16251         End Function
16252         
16253         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16254          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16255          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
16256          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
16257         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.POSGroupingDataTable
16258             Me.Adapter.SelectCommand = Me.CommandCollection(0)
16259             Dim dataTable As RPOS_DBDataSet.POSGroupingDataTable = New RPOS_DBDataSet.POSGroupingDataTable()
16260             Me.Adapter.Fill(dataTable)
16261             Return dataTable
16262         End Function
16263         
16264         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16265          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16266          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
16267         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.POSGroupingDataTable) As Integer
16268             Return Me.Adapter.Update(dataTable)
16269         End Function
16270         
16271         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16272          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16273          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
16274         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
16275             Return Me.Adapter.Update(dataSet, "POSGrouping")
16276         End Function
16277         
16278         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16279          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16280          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
16281         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
16282             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
16283         End Function
16284         
16285         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16286          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16287          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
16288         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
16289             Return Me.Adapter.Update(dataRows)
16290         End Function
16291         
16292         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16293          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16294          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
16295          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
16296         Public Overloads Overridable Function Delete( _
16297                     ByVal Original_Id As Integer, _
16298                     ByVal Original_Col1 As Global.System.Nullable(Of Integer), _
16299                     ByVal Original_Col2 As String, _
16300                     ByVal Original_Col3 As Global.System.Nullable(Of Decimal), _
16301                     ByVal Original_Col4 As Global.System.Nullable(Of Decimal), _
16302                     ByVal Original_Col5 As Global.System.Nullable(Of Decimal), _
16303                     ByVal Original_Col6 As Global.System.Nullable(Of Decimal), _
16304                     ByVal Original_Col7 As Global.System.Nullable(Of Decimal), _
16305                     ByVal Original_Col8 As Global.System.Nullable(Of Decimal), _
16306                     ByVal Original_Col9 As Global.System.Nullable(Of Decimal), _
16307                     ByVal Original_Col10 As Global.System.Nullable(Of Decimal), _
16308                     ByVal Original_Col11 As Global.System.Nullable(Of Decimal), _
16309                     ByVal Original_Col12 As Global.System.Nullable(Of Decimal), _
16310                     ByVal Original_Col13 As Global.System.Nullable(Of Decimal), _
16311                     ByVal Original_Col14 As Global.System.Nullable(Of Decimal), _
16312                     ByVal Original_Col15 As String) As Integer
16313             Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_Id,Integer)
16314             If (Original_Col1.HasValue = true) Then
16315                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
16316                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_Col1.Value,Integer)
16317             Else
16318                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
16319                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
16320             End If
16321             If (Original_Col2 Is Nothing) Then
16322                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
16323                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
16324             Else
16325                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
16326                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_Col2,String)
16327             End If
16328             If (Original_Col3.HasValue = true) Then
16329                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
16330                 Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_Col3.Value,Decimal)
16331             Else
16332                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
16333                 Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
16334             End If
16335             If (Original_Col4.HasValue = true) Then
16336                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(0,Object)
16337                 Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_Col4.Value,Decimal)
16338             Else
16339                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(1,Object)
16340                 Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
16341             End If
16342             If (Original_Col5.HasValue = true) Then
16343                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(0,Object)
16344                 Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_Col5.Value,Decimal)
16345             Else
16346                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(1,Object)
16347                 Me.Adapter.DeleteCommand.Parameters(10).Value = Global.System.DBNull.Value
16348             End If
16349             If (Original_Col6.HasValue = true) Then
16350                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(0,Object)
16351                 Me.Adapter.DeleteCommand.Parameters(12).Value = CType(Original_Col6.Value,Decimal)
16352             Else
16353                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(1,Object)
16354                 Me.Adapter.DeleteCommand.Parameters(12).Value = Global.System.DBNull.Value
16355             End If
16356             If (Original_Col7.HasValue = true) Then
16357                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(0,Object)
16358                 Me.Adapter.DeleteCommand.Parameters(14).Value = CType(Original_Col7.Value,Decimal)
16359             Else
16360                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(1,Object)
16361                 Me.Adapter.DeleteCommand.Parameters(14).Value = Global.System.DBNull.Value
16362             End If
16363             If (Original_Col8.HasValue = true) Then
16364                 Me.Adapter.DeleteCommand.Parameters(15).Value = CType(0,Object)
16365                 Me.Adapter.DeleteCommand.Parameters(16).Value = CType(Original_Col8.Value,Decimal)
16366             Else
16367                 Me.Adapter.DeleteCommand.Parameters(15).Value = CType(1,Object)
16368                 Me.Adapter.DeleteCommand.Parameters(16).Value = Global.System.DBNull.Value
16369             End If
16370             If (Original_Col9.HasValue = true) Then
16371                 Me.Adapter.DeleteCommand.Parameters(17).Value = CType(0,Object)
16372                 Me.Adapter.DeleteCommand.Parameters(18).Value = CType(Original_Col9.Value,Decimal)
16373             Else
16374                 Me.Adapter.DeleteCommand.Parameters(17).Value = CType(1,Object)
16375                 Me.Adapter.DeleteCommand.Parameters(18).Value = Global.System.DBNull.Value
16376             End If
16377             If (Original_Col10.HasValue = true) Then
16378                 Me.Adapter.DeleteCommand.Parameters(19).Value = CType(0,Object)
16379                 Me.Adapter.DeleteCommand.Parameters(20).Value = CType(Original_Col10.Value,Decimal)
16380             Else
16381                 Me.Adapter.DeleteCommand.Parameters(19).Value = CType(1,Object)
16382                 Me.Adapter.DeleteCommand.Parameters(20).Value = Global.System.DBNull.Value
16383             End If
16384             If (Original_Col11.HasValue = true) Then
16385                 Me.Adapter.DeleteCommand.Parameters(21).Value = CType(0,Object)
16386                 Me.Adapter.DeleteCommand.Parameters(22).Value = CType(Original_Col11.Value,Decimal)
16387             Else
16388                 Me.Adapter.DeleteCommand.Parameters(21).Value = CType(1,Object)
16389                 Me.Adapter.DeleteCommand.Parameters(22).Value = Global.System.DBNull.Value
16390             End If
16391             If (Original_Col12.HasValue = true) Then
16392                 Me.Adapter.DeleteCommand.Parameters(23).Value = CType(0,Object)
16393                 Me.Adapter.DeleteCommand.Parameters(24).Value = CType(Original_Col12.Value,Decimal)
16394             Else
16395                 Me.Adapter.DeleteCommand.Parameters(23).Value = CType(1,Object)
16396                 Me.Adapter.DeleteCommand.Parameters(24).Value = Global.System.DBNull.Value
16397             End If
16398             If (Original_Col13.HasValue = true) Then
16399                 Me.Adapter.DeleteCommand.Parameters(25).Value = CType(0,Object)
16400                 Me.Adapter.DeleteCommand.Parameters(26).Value = CType(Original_Col13.Value,Decimal)
16401             Else
16402                 Me.Adapter.DeleteCommand.Parameters(25).Value = CType(1,Object)
16403                 Me.Adapter.DeleteCommand.Parameters(26).Value = Global.System.DBNull.Value
16404             End If
16405             If (Original_Col14.HasValue = true) Then
16406                 Me.Adapter.DeleteCommand.Parameters(27).Value = CType(0,Object)
16407                 Me.Adapter.DeleteCommand.Parameters(28).Value = CType(Original_Col14.Value,Decimal)
16408             Else
16409                 Me.Adapter.DeleteCommand.Parameters(27).Value = CType(1,Object)
16410                 Me.Adapter.DeleteCommand.Parameters(28).Value = Global.System.DBNull.Value
16411             End If
16412             If (Original_Col15 Is Nothing) Then
16413                 Me.Adapter.DeleteCommand.Parameters(29).Value = CType(1,Object)
16414                 Me.Adapter.DeleteCommand.Parameters(30).Value = Global.System.DBNull.Value
16415             Else
16416                 Me.Adapter.DeleteCommand.Parameters(29).Value = CType(0,Object)
16417                 Me.Adapter.DeleteCommand.Parameters(30).Value = CType(Original_Col15,String)
16418             End If
16419             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
16420             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
16421                         <> Global.System.Data.ConnectionState.Open) Then
16422                 Me.Adapter.DeleteCommand.Connection.Open
16423             End If
16424             Try
16425                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
16426                 Return returnValue
16427             Finally
16428                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
16429                     Me.Adapter.DeleteCommand.Connection.Close
16430                 End If
16431             End Try
16432         End Function
16433         
16434         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16435          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16436          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
16437          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
16438         Public Overloads Overridable Function Insert(ByVal Col1 As Global.System.Nullable(Of Integer), ByVal Col2 As String, ByVal Col3 As Global.System.Nullable(Of Decimal), ByVal Col4 As Global.System.Nullable(Of Decimal), ByVal Col5 As Global.System.Nullable(Of Decimal), ByVal Col6 As Global.System.Nullable(Of Decimal), ByVal Col7 As Global.System.Nullable(Of Decimal), ByVal Col8 As Global.System.Nullable(Of Decimal), ByVal Col9 As Global.System.Nullable(Of Decimal), ByVal Col10 As Global.System.Nullable(Of Decimal), ByVal Col11 As Global.System.Nullable(Of Decimal), ByVal Col12 As Global.System.Nullable(Of Decimal), ByVal Col13 As Global.System.Nullable(Of Decimal), ByVal Col14 As Global.System.Nullable(Of Decimal), ByVal Col15 As String) As Integer
16439             If (Col1.HasValue = true) Then
16440                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(Col1.Value,Integer)
16441             Else
16442                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
16443             End If
16444             If (Col2 Is Nothing) Then
16445                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
16446             Else
16447                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(Col2,String)
16448             End If
16449             If (Col3.HasValue = true) Then
16450                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(Col3.Value,Decimal)
16451             Else
16452                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
16453             End If
16454             If (Col4.HasValue = true) Then
16455                 Me.Adapter.InsertCommand.Parameters(3).Value = CType(Col4.Value,Decimal)
16456             Else
16457                 Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
16458             End If
16459             If (Col5.HasValue = true) Then
16460                 Me.Adapter.InsertCommand.Parameters(4).Value = CType(Col5.Value,Decimal)
16461             Else
16462                 Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
16463             End If
16464             If (Col6.HasValue = true) Then
16465                 Me.Adapter.InsertCommand.Parameters(5).Value = CType(Col6.Value,Decimal)
16466             Else
16467                 Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
16468             End If
16469             If (Col7.HasValue = true) Then
16470                 Me.Adapter.InsertCommand.Parameters(6).Value = CType(Col7.Value,Decimal)
16471             Else
16472                 Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
16473             End If
16474             If (Col8.HasValue = true) Then
16475                 Me.Adapter.InsertCommand.Parameters(7).Value = CType(Col8.Value,Decimal)
16476             Else
16477                 Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
16478             End If
16479             If (Col9.HasValue = true) Then
16480                 Me.Adapter.InsertCommand.Parameters(8).Value = CType(Col9.Value,Decimal)
16481             Else
16482                 Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
16483             End If
16484             If (Col10.HasValue = true) Then
16485                 Me.Adapter.InsertCommand.Parameters(9).Value = CType(Col10.Value,Decimal)
16486             Else
16487                 Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
16488             End If
16489             If (Col11.HasValue = true) Then
16490                 Me.Adapter.InsertCommand.Parameters(10).Value = CType(Col11.Value,Decimal)
16491             Else
16492                 Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
16493             End If
16494             If (Col12.HasValue = true) Then
16495                 Me.Adapter.InsertCommand.Parameters(11).Value = CType(Col12.Value,Decimal)
16496             Else
16497                 Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
16498             End If
16499             If (Col13.HasValue = true) Then
16500                 Me.Adapter.InsertCommand.Parameters(12).Value = CType(Col13.Value,Decimal)
16501             Else
16502                 Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
16503             End If
16504             If (Col14.HasValue = true) Then
16505                 Me.Adapter.InsertCommand.Parameters(13).Value = CType(Col14.Value,Decimal)
16506             Else
16507                 Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
16508             End If
16509             If (Col15 Is Nothing) Then
16510                 Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
16511             Else
16512                 Me.Adapter.InsertCommand.Parameters(14).Value = CType(Col15,String)
16513             End If
16514             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
16515             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
16516                         <> Global.System.Data.ConnectionState.Open) Then
16517                 Me.Adapter.InsertCommand.Connection.Open
16518             End If
16519             Try
16520                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
16521                 Return returnValue
16522             Finally
16523                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
16524                     Me.Adapter.InsertCommand.Connection.Close
16525                 End If
16526             End Try
16527         End Function
16528         
16529         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16530          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16531          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
16532          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
16533         Public Overloads Overridable Function Update( _
16534                     ByVal Col1 As Global.System.Nullable(Of Integer), _
16535                     ByVal Col2 As String, _
16536                     ByVal Col3 As Global.System.Nullable(Of Decimal), _
16537                     ByVal Col4 As Global.System.Nullable(Of Decimal), _
16538                     ByVal Col5 As Global.System.Nullable(Of Decimal), _
16539                     ByVal Col6 As Global.System.Nullable(Of Decimal), _
16540                     ByVal Col7 As Global.System.Nullable(Of Decimal), _
16541                     ByVal Col8 As Global.System.Nullable(Of Decimal), _
16542                     ByVal Col9 As Global.System.Nullable(Of Decimal), _
16543                     ByVal Col10 As Global.System.Nullable(Of Decimal), _
16544                     ByVal Col11 As Global.System.Nullable(Of Decimal), _
16545                     ByVal Col12 As Global.System.Nullable(Of Decimal), _
16546                     ByVal Col13 As Global.System.Nullable(Of Decimal), _
16547                     ByVal Col14 As Global.System.Nullable(Of Decimal), _
16548                     ByVal Col15 As String, _
16549                     ByVal Original_Id As Integer, _
16550                     ByVal Original_Col1 As Global.System.Nullable(Of Integer), _
16551                     ByVal Original_Col2 As String, _
16552                     ByVal Original_Col3 As Global.System.Nullable(Of Decimal), _
16553                     ByVal Original_Col4 As Global.System.Nullable(Of Decimal), _
16554                     ByVal Original_Col5 As Global.System.Nullable(Of Decimal), _
16555                     ByVal Original_Col6 As Global.System.Nullable(Of Decimal), _
16556                     ByVal Original_Col7 As Global.System.Nullable(Of Decimal), _
16557                     ByVal Original_Col8 As Global.System.Nullable(Of Decimal), _
16558                     ByVal Original_Col9 As Global.System.Nullable(Of Decimal), _
16559                     ByVal Original_Col10 As Global.System.Nullable(Of Decimal), _
16560                     ByVal Original_Col11 As Global.System.Nullable(Of Decimal), _
16561                     ByVal Original_Col12 As Global.System.Nullable(Of Decimal), _
16562                     ByVal Original_Col13 As Global.System.Nullable(Of Decimal), _
16563                     ByVal Original_Col14 As Global.System.Nullable(Of Decimal), _
16564                     ByVal Original_Col15 As String) As Integer
16565             If (Col1.HasValue = true) Then
16566                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(Col1.Value,Integer)
16567             Else
16568                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
16569             End If
16570             If (Col2 Is Nothing) Then
16571                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
16572             Else
16573                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Col2,String)
16574             End If
16575             If (Col3.HasValue = true) Then
16576                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(Col3.Value,Decimal)
16577             Else
16578                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
16579             End If
16580             If (Col4.HasValue = true) Then
16581                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(Col4.Value,Decimal)
16582             Else
16583                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
16584             End If
16585             If (Col5.HasValue = true) Then
16586                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(Col5.Value,Decimal)
16587             Else
16588                 Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
16589             End If
16590             If (Col6.HasValue = true) Then
16591                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(Col6.Value,Decimal)
16592             Else
16593                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
16594             End If
16595             If (Col7.HasValue = true) Then
16596                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(Col7.Value,Decimal)
16597             Else
16598                 Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
16599             End If
16600             If (Col8.HasValue = true) Then
16601                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(Col8.Value,Decimal)
16602             Else
16603                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
16604             End If
16605             If (Col9.HasValue = true) Then
16606                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(Col9.Value,Decimal)
16607             Else
16608                 Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
16609             End If
16610             If (Col10.HasValue = true) Then
16611                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(Col10.Value,Decimal)
16612             Else
16613                 Me.Adapter.UpdateCommand.Parameters(9).Value = Global.System.DBNull.Value
16614             End If
16615             If (Col11.HasValue = true) Then
16616                 Me.Adapter.UpdateCommand.Parameters(10).Value = CType(Col11.Value,Decimal)
16617             Else
16618                 Me.Adapter.UpdateCommand.Parameters(10).Value = Global.System.DBNull.Value
16619             End If
16620             If (Col12.HasValue = true) Then
16621                 Me.Adapter.UpdateCommand.Parameters(11).Value = CType(Col12.Value,Decimal)
16622             Else
16623                 Me.Adapter.UpdateCommand.Parameters(11).Value = Global.System.DBNull.Value
16624             End If
16625             If (Col13.HasValue = true) Then
16626                 Me.Adapter.UpdateCommand.Parameters(12).Value = CType(Col13.Value,Decimal)
16627             Else
16628                 Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
16629             End If
16630             If (Col14.HasValue = true) Then
16631                 Me.Adapter.UpdateCommand.Parameters(13).Value = CType(Col14.Value,Decimal)
16632             Else
16633                 Me.Adapter.UpdateCommand.Parameters(13).Value = Global.System.DBNull.Value
16634             End If
16635             If (Col15 Is Nothing) Then
16636                 Me.Adapter.UpdateCommand.Parameters(14).Value = Global.System.DBNull.Value
16637             Else
16638                 Me.Adapter.UpdateCommand.Parameters(14).Value = CType(Col15,String)
16639             End If
16640             Me.Adapter.UpdateCommand.Parameters(15).Value = CType(Original_Id,Integer)
16641             If (Original_Col1.HasValue = true) Then
16642                 Me.Adapter.UpdateCommand.Parameters(16).Value = CType(0,Object)
16643                 Me.Adapter.UpdateCommand.Parameters(17).Value = CType(Original_Col1.Value,Integer)
16644             Else
16645                 Me.Adapter.UpdateCommand.Parameters(16).Value = CType(1,Object)
16646                 Me.Adapter.UpdateCommand.Parameters(17).Value = Global.System.DBNull.Value
16647             End If
16648             If (Original_Col2 Is Nothing) Then
16649                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(1,Object)
16650                 Me.Adapter.UpdateCommand.Parameters(19).Value = Global.System.DBNull.Value
16651             Else
16652                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(0,Object)
16653                 Me.Adapter.UpdateCommand.Parameters(19).Value = CType(Original_Col2,String)
16654             End If
16655             If (Original_Col3.HasValue = true) Then
16656                 Me.Adapter.UpdateCommand.Parameters(20).Value = CType(0,Object)
16657                 Me.Adapter.UpdateCommand.Parameters(21).Value = CType(Original_Col3.Value,Decimal)
16658             Else
16659                 Me.Adapter.UpdateCommand.Parameters(20).Value = CType(1,Object)
16660                 Me.Adapter.UpdateCommand.Parameters(21).Value = Global.System.DBNull.Value
16661             End If
16662             If (Original_Col4.HasValue = true) Then
16663                 Me.Adapter.UpdateCommand.Parameters(22).Value = CType(0,Object)
16664                 Me.Adapter.UpdateCommand.Parameters(23).Value = CType(Original_Col4.Value,Decimal)
16665             Else
16666                 Me.Adapter.UpdateCommand.Parameters(22).Value = CType(1,Object)
16667                 Me.Adapter.UpdateCommand.Parameters(23).Value = Global.System.DBNull.Value
16668             End If
16669             If (Original_Col5.HasValue = true) Then
16670                 Me.Adapter.UpdateCommand.Parameters(24).Value = CType(0,Object)
16671                 Me.Adapter.UpdateCommand.Parameters(25).Value = CType(Original_Col5.Value,Decimal)
16672             Else
16673                 Me.Adapter.UpdateCommand.Parameters(24).Value = CType(1,Object)
16674                 Me.Adapter.UpdateCommand.Parameters(25).Value = Global.System.DBNull.Value
16675             End If
16676             If (Original_Col6.HasValue = true) Then
16677                 Me.Adapter.UpdateCommand.Parameters(26).Value = CType(0,Object)
16678                 Me.Adapter.UpdateCommand.Parameters(27).Value = CType(Original_Col6.Value,Decimal)
16679             Else
16680                 Me.Adapter.UpdateCommand.Parameters(26).Value = CType(1,Object)
16681                 Me.Adapter.UpdateCommand.Parameters(27).Value = Global.System.DBNull.Value
16682             End If
16683             If (Original_Col7.HasValue = true) Then
16684                 Me.Adapter.UpdateCommand.Parameters(28).Value = CType(0,Object)
16685                 Me.Adapter.UpdateCommand.Parameters(29).Value = CType(Original_Col7.Value,Decimal)
16686             Else
16687                 Me.Adapter.UpdateCommand.Parameters(28).Value = CType(1,Object)
16688                 Me.Adapter.UpdateCommand.Parameters(29).Value = Global.System.DBNull.Value
16689             End If
16690             If (Original_Col8.HasValue = true) Then
16691                 Me.Adapter.UpdateCommand.Parameters(30).Value = CType(0,Object)
16692                 Me.Adapter.UpdateCommand.Parameters(31).Value = CType(Original_Col8.Value,Decimal)
16693             Else
16694                 Me.Adapter.UpdateCommand.Parameters(30).Value = CType(1,Object)
16695                 Me.Adapter.UpdateCommand.Parameters(31).Value = Global.System.DBNull.Value
16696             End If
16697             If (Original_Col9.HasValue = true) Then
16698                 Me.Adapter.UpdateCommand.Parameters(32).Value = CType(0,Object)
16699                 Me.Adapter.UpdateCommand.Parameters(33).Value = CType(Original_Col9.Value,Decimal)
16700             Else
16701                 Me.Adapter.UpdateCommand.Parameters(32).Value = CType(1,Object)
16702                 Me.Adapter.UpdateCommand.Parameters(33).Value = Global.System.DBNull.Value
16703             End If
16704             If (Original_Col10.HasValue = true) Then
16705                 Me.Adapter.UpdateCommand.Parameters(34).Value = CType(0,Object)
16706                 Me.Adapter.UpdateCommand.Parameters(35).Value = CType(Original_Col10.Value,Decimal)
16707             Else
16708                 Me.Adapter.UpdateCommand.Parameters(34).Value = CType(1,Object)
16709                 Me.Adapter.UpdateCommand.Parameters(35).Value = Global.System.DBNull.Value
16710             End If
16711             If (Original_Col11.HasValue = true) Then
16712                 Me.Adapter.UpdateCommand.Parameters(36).Value = CType(0,Object)
16713                 Me.Adapter.UpdateCommand.Parameters(37).Value = CType(Original_Col11.Value,Decimal)
16714             Else
16715                 Me.Adapter.UpdateCommand.Parameters(36).Value = CType(1,Object)
16716                 Me.Adapter.UpdateCommand.Parameters(37).Value = Global.System.DBNull.Value
16717             End If
16718             If (Original_Col12.HasValue = true) Then
16719                 Me.Adapter.UpdateCommand.Parameters(38).Value = CType(0,Object)
16720                 Me.Adapter.UpdateCommand.Parameters(39).Value = CType(Original_Col12.Value,Decimal)
16721             Else
16722                 Me.Adapter.UpdateCommand.Parameters(38).Value = CType(1,Object)
16723                 Me.Adapter.UpdateCommand.Parameters(39).Value = Global.System.DBNull.Value
16724             End If
16725             If (Original_Col13.HasValue = true) Then
16726                 Me.Adapter.UpdateCommand.Parameters(40).Value = CType(0,Object)
16727                 Me.Adapter.UpdateCommand.Parameters(41).Value = CType(Original_Col13.Value,Decimal)
16728             Else
16729                 Me.Adapter.UpdateCommand.Parameters(40).Value = CType(1,Object)
16730                 Me.Adapter.UpdateCommand.Parameters(41).Value = Global.System.DBNull.Value
16731             End If
16732             If (Original_Col14.HasValue = true) Then
16733                 Me.Adapter.UpdateCommand.Parameters(42).Value = CType(0,Object)
16734                 Me.Adapter.UpdateCommand.Parameters(43).Value = CType(Original_Col14.Value,Decimal)
16735             Else
16736                 Me.Adapter.UpdateCommand.Parameters(42).Value = CType(1,Object)
16737                 Me.Adapter.UpdateCommand.Parameters(43).Value = Global.System.DBNull.Value
16738             End If
16739             If (Original_Col15 Is Nothing) Then
16740                 Me.Adapter.UpdateCommand.Parameters(44).Value = CType(1,Object)
16741                 Me.Adapter.UpdateCommand.Parameters(45).Value = Global.System.DBNull.Value
16742             Else
16743                 Me.Adapter.UpdateCommand.Parameters(44).Value = CType(0,Object)
16744                 Me.Adapter.UpdateCommand.Parameters(45).Value = CType(Original_Col15,String)
16745             End If
16746             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
16747             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
16748                         <> Global.System.Data.ConnectionState.Open) Then
16749                 Me.Adapter.UpdateCommand.Connection.Open
16750             End If
16751             Try
16752                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
16753                 Return returnValue
16754             Finally
16755                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
16756                     Me.Adapter.UpdateCommand.Connection.Close
16757                 End If
16758             End Try
16759         End Function
16760     End Class
16761     
16762     '''<summary>
16763     '''Represents the connection and commands used to retrieve and save data.
16764     '''</summary>
16765     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
16766      Global.System.ComponentModel.ToolboxItem(true), _
16767      Global.System.ComponentModel.DataObjectAttribute(true), _
16768      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
16769         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
16770      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
16771     Partial Public Class POSPrinterSettingTableAdapter
16772         Inherits Global.System.ComponentModel.Component
16773         
16774         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
16775         
16776         Private _connection As Global.System.Data.OleDb.OleDbConnection
16777         
16778         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
16779         
16780         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
16781         
16782         Private _clearBeforeFill As Boolean
16783         
16784         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16785          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16786         Public Sub New()
16787             MyBase.New
16788             Me.ClearBeforeFill = true
16789         End Sub
16790         
16791         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16792          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16793         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
16794             Get
16795                 If (Me._adapter Is Nothing) Then
16796                     Me.InitAdapter
16797                 End If
16798                 Return Me._adapter
16799             End Get
16800         End Property
16801         
16802         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16803          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16804         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
16805             Get
16806                 If (Me._connection Is Nothing) Then
16807                     Me.InitConnection
16808                 End If
16809                 Return Me._connection
16810             End Get
16811             Set
16812                 Me._connection = value
16813                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
16814                     Me.Adapter.InsertCommand.Connection = value
16815                 End If
16816                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
16817                     Me.Adapter.DeleteCommand.Connection = value
16818                 End If
16819                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
16820                     Me.Adapter.UpdateCommand.Connection = value
16821                 End If
16822                 Dim i As Integer = 0
16823                 Do While (i < Me.CommandCollection.Length)
16824                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
16825                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
16826                     End If
16827                     i = (i + 1)
16828                 Loop
16829             End Set
16830         End Property
16831         
16832         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16833          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16834         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
16835             Get
16836                 Return Me._transaction
16837             End Get
16838             Set
16839                 Me._transaction = value
16840                 Dim i As Integer = 0
16841                 Do While (i < Me.CommandCollection.Length)
16842                     Me.CommandCollection(i).Transaction = Me._transaction
16843                     i = (i + 1)
16844                 Loop
16845                 If ((Not (Me.Adapter) Is Nothing) _
16846                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
16847                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
16848                 End If
16849                 If ((Not (Me.Adapter) Is Nothing) _
16850                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
16851                     Me.Adapter.InsertCommand.Transaction = Me._transaction
16852                 End If
16853                 If ((Not (Me.Adapter) Is Nothing) _
16854                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
16855                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
16856                 End If
16857             End Set
16858         End Property
16859         
16860         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16861          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16862         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
16863             Get
16864                 If (Me._commandCollection Is Nothing) Then
16865                     Me.InitCommandCollection
16866                 End If
16867                 Return Me._commandCollection
16868             End Get
16869         End Property
16870         
16871         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16872          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16873         Public Property ClearBeforeFill() As Boolean
16874             Get
16875                 Return Me._clearBeforeFill
16876             End Get
16877             Set
16878                 Me._clearBeforeFill = value
16879             End Set
16880         End Property
16881         
16882         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16883          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16884         Private Sub InitAdapter()
16885             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
16886             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
16887             tableMapping.SourceTable = "Table"
16888             tableMapping.DataSetTable = "POSPrinterSetting"
16889             tableMapping.ColumnMappings.Add("Id", "Id")
16890             tableMapping.ColumnMappings.Add("PrinterName", "PrinterName")
16891             tableMapping.ColumnMappings.Add("PrinterType", "PrinterType")
16892             tableMapping.ColumnMappings.Add("IsEnabled", "IsEnabled")
16893             Me._adapter.TableMappings.Add(tableMapping)
16894             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
16895             Me._adapter.DeleteCommand.Connection = Me.Connection
16896             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `POSPrinterSetting` WHERE ((`Id` = ?) AND ((? = 1 AND `PrinterName` I"& _
16897                 "S NULL) OR (`PrinterName` = ?)) AND ((? = 1 AND `PrinterType` IS NULL) OR (`Prin"& _
16898                 "terType` = ?)) AND ((? = 1 AND `IsEnabled` IS NULL) OR (`IsEnabled` = ?)))"
16899             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
16900             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Id", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Id", Global.System.Data.DataRowVersion.Original, false, Nothing))
16901             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_PrinterName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterName", Global.System.Data.DataRowVersion.Original, true, Nothing))
16902             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_PrinterName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterName", Global.System.Data.DataRowVersion.Original, false, Nothing))
16903             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_PrinterType", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterType", Global.System.Data.DataRowVersion.Original, true, Nothing))
16904             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_PrinterType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterType", Global.System.Data.DataRowVersion.Original, false, Nothing))
16905             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_IsEnabled", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Original, true, Nothing))
16906             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_IsEnabled", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Original, false, Nothing))
16907             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
16908             Me._adapter.InsertCommand.Connection = Me.Connection
16909             Me._adapter.InsertCommand.CommandText = "INSERT INTO `POSPrinterSetting` (`PrinterName`, `PrinterType`, `IsEnabled`) VALUE"& _
16910                 "S (?, ?, ?)"
16911             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
16912             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("PrinterName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterName", Global.System.Data.DataRowVersion.Current, false, Nothing))
16913             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("PrinterType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterType", Global.System.Data.DataRowVersion.Current, false, Nothing))
16914             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsEnabled", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Current, false, Nothing))
16915             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
16916             Me._adapter.UpdateCommand.Connection = Me.Connection
16917             Me._adapter.UpdateCommand.CommandText = "UPDATE `POSPrinterSetting` SET `PrinterName` = ?, `PrinterType` = ?, `IsEnabled` "& _
16918                 "= ? WHERE ((`Id` = ?) AND ((? = 1 AND `PrinterName` IS NULL) OR (`PrinterName` ="& _
16919                 " ?)) AND ((? = 1 AND `PrinterType` IS NULL) OR (`PrinterType` = ?)) AND ((? = 1 "& _
16920                 "AND `IsEnabled` IS NULL) OR (`IsEnabled` = ?)))"
16921             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
16922             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("PrinterName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterName", Global.System.Data.DataRowVersion.Current, false, Nothing))
16923             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("PrinterType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterType", Global.System.Data.DataRowVersion.Current, false, Nothing))
16924             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsEnabled", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Current, false, Nothing))
16925             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Id", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Id", Global.System.Data.DataRowVersion.Original, false, Nothing))
16926             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_PrinterName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterName", Global.System.Data.DataRowVersion.Original, true, Nothing))
16927             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_PrinterName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterName", Global.System.Data.DataRowVersion.Original, false, Nothing))
16928             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_PrinterType", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterType", Global.System.Data.DataRowVersion.Original, true, Nothing))
16929             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_PrinterType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PrinterType", Global.System.Data.DataRowVersion.Original, false, Nothing))
16930             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_IsEnabled", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Original, true, Nothing))
16931             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_IsEnabled", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "IsEnabled", Global.System.Data.DataRowVersion.Original, false, Nothing))
16932         End Sub
16933         
16934         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16935          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16936         Private Sub InitConnection()
16937             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
16938             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
16939         End Sub
16940         
16941         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16942          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
16943         Private Sub InitCommandCollection()
16944             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
16945             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
16946             Me._commandCollection(0).Connection = Me.Connection
16947             Me._commandCollection(0).CommandText = "SELECT Id, PrinterName, PrinterType, IsEnabled FROM POSPrinterSetting"
16948             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
16949         End Sub
16950         
16951         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16952          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16953          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
16954          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
16955         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.POSPrinterSettingDataTable) As Integer
16956             Me.Adapter.SelectCommand = Me.CommandCollection(0)
16957             If (Me.ClearBeforeFill = true) Then
16958                 dataTable.Clear
16959             End If
16960             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
16961             Return returnValue
16962         End Function
16963         
16964         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16965          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16966          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
16967          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
16968         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.POSPrinterSettingDataTable
16969             Me.Adapter.SelectCommand = Me.CommandCollection(0)
16970             Dim dataTable As RPOS_DBDataSet.POSPrinterSettingDataTable = New RPOS_DBDataSet.POSPrinterSettingDataTable()
16971             Me.Adapter.Fill(dataTable)
16972             Return dataTable
16973         End Function
16974         
16975         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16976          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16977          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
16978         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.POSPrinterSettingDataTable) As Integer
16979             Return Me.Adapter.Update(dataTable)
16980         End Function
16981         
16982         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16983          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16984          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
16985         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
16986             Return Me.Adapter.Update(dataSet, "POSPrinterSetting")
16987         End Function
16988         
16989         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16990          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16991          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
16992         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
16993             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
16994         End Function
16995         
16996         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
16997          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
16998          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
16999         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
17000             Return Me.Adapter.Update(dataRows)
17001         End Function
17002         
17003         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17004          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17005          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17006          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
17007         Public Overloads Overridable Function Delete(ByVal Original_Id As Integer, ByVal Original_PrinterName As String, ByVal Original_PrinterType As String, ByVal Original_IsEnabled As String) As Integer
17008             Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_Id,Integer)
17009             If (Original_PrinterName Is Nothing) Then
17010                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
17011                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
17012             Else
17013                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
17014                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_PrinterName,String)
17015             End If
17016             If (Original_PrinterType Is Nothing) Then
17017                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
17018                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
17019             Else
17020                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
17021                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_PrinterType,String)
17022             End If
17023             If (Original_IsEnabled Is Nothing) Then
17024                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
17025                 Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
17026             Else
17027                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
17028                 Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_IsEnabled,String)
17029             End If
17030             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
17031             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
17032                         <> Global.System.Data.ConnectionState.Open) Then
17033                 Me.Adapter.DeleteCommand.Connection.Open
17034             End If
17035             Try
17036                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
17037                 Return returnValue
17038             Finally
17039                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
17040                     Me.Adapter.DeleteCommand.Connection.Close
17041                 End If
17042             End Try
17043         End Function
17044         
17045         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17046          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17047          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17048          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
17049         Public Overloads Overridable Function Insert(ByVal PrinterName As String, ByVal PrinterType As String, ByVal IsEnabled As String) As Integer
17050             If (PrinterName Is Nothing) Then
17051                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
17052             Else
17053                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(PrinterName,String)
17054             End If
17055             If (PrinterType Is Nothing) Then
17056                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
17057             Else
17058                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(PrinterType,String)
17059             End If
17060             If (IsEnabled Is Nothing) Then
17061                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
17062             Else
17063                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(IsEnabled,String)
17064             End If
17065             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
17066             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
17067                         <> Global.System.Data.ConnectionState.Open) Then
17068                 Me.Adapter.InsertCommand.Connection.Open
17069             End If
17070             Try
17071                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
17072                 Return returnValue
17073             Finally
17074                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
17075                     Me.Adapter.InsertCommand.Connection.Close
17076                 End If
17077             End Try
17078         End Function
17079         
17080         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17081          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17082          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17083          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
17084         Public Overloads Overridable Function Update(ByVal PrinterName As String, ByVal PrinterType As String, ByVal IsEnabled As String, ByVal Original_Id As Integer, ByVal Original_PrinterName As String, ByVal Original_PrinterType As String, ByVal Original_IsEnabled As String) As Integer
17085             If (PrinterName Is Nothing) Then
17086                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
17087             Else
17088                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(PrinterName,String)
17089             End If
17090             If (PrinterType Is Nothing) Then
17091                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
17092             Else
17093                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(PrinterType,String)
17094             End If
17095             If (IsEnabled Is Nothing) Then
17096                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
17097             Else
17098                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(IsEnabled,String)
17099             End If
17100             Me.Adapter.UpdateCommand.Parameters(3).Value = CType(Original_Id,Integer)
17101             If (Original_PrinterName Is Nothing) Then
17102                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(1,Object)
17103                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
17104             Else
17105                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(0,Object)
17106                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(Original_PrinterName,String)
17107             End If
17108             If (Original_PrinterType Is Nothing) Then
17109                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(1,Object)
17110                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
17111             Else
17112                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(0,Object)
17113                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(Original_PrinterType,String)
17114             End If
17115             If (Original_IsEnabled Is Nothing) Then
17116                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(1,Object)
17117                 Me.Adapter.UpdateCommand.Parameters(9).Value = Global.System.DBNull.Value
17118             Else
17119                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(0,Object)
17120                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(Original_IsEnabled,String)
17121             End If
17122             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
17123             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
17124                         <> Global.System.Data.ConnectionState.Open) Then
17125                 Me.Adapter.UpdateCommand.Connection.Open
17126             End If
17127             Try
17128                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
17129                 Return returnValue
17130             Finally
17131                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
17132                     Me.Adapter.UpdateCommand.Connection.Close
17133                 End If
17134             End Try
17135         End Function
17136     End Class
17137     
17138     '''<summary>
17139     '''Represents the connection and commands used to retrieve and save data.
17140     '''</summary>
17141     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
17142      Global.System.ComponentModel.ToolboxItem(true), _
17143      Global.System.ComponentModel.DataObjectAttribute(true), _
17144      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
17145         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
17146      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
17147     Partial Public Class R_TableTableAdapter
17148         Inherits Global.System.ComponentModel.Component
17149         
17150         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
17151         
17152         Private _connection As Global.System.Data.OleDb.OleDbConnection
17153         
17154         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
17155         
17156         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
17157         
17158         Private _clearBeforeFill As Boolean
17159         
17160         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17161          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17162         Public Sub New()
17163             MyBase.New
17164             Me.ClearBeforeFill = true
17165         End Sub
17166         
17167         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17168          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17169         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
17170             Get
17171                 If (Me._adapter Is Nothing) Then
17172                     Me.InitAdapter
17173                 End If
17174                 Return Me._adapter
17175             End Get
17176         End Property
17177         
17178         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17179          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17180         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
17181             Get
17182                 If (Me._connection Is Nothing) Then
17183                     Me.InitConnection
17184                 End If
17185                 Return Me._connection
17186             End Get
17187             Set
17188                 Me._connection = value
17189                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
17190                     Me.Adapter.InsertCommand.Connection = value
17191                 End If
17192                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
17193                     Me.Adapter.DeleteCommand.Connection = value
17194                 End If
17195                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
17196                     Me.Adapter.UpdateCommand.Connection = value
17197                 End If
17198                 Dim i As Integer = 0
17199                 Do While (i < Me.CommandCollection.Length)
17200                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
17201                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
17202                     End If
17203                     i = (i + 1)
17204                 Loop
17205             End Set
17206         End Property
17207         
17208         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17209          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17210         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
17211             Get
17212                 Return Me._transaction
17213             End Get
17214             Set
17215                 Me._transaction = value
17216                 Dim i As Integer = 0
17217                 Do While (i < Me.CommandCollection.Length)
17218                     Me.CommandCollection(i).Transaction = Me._transaction
17219                     i = (i + 1)
17220                 Loop
17221                 If ((Not (Me.Adapter) Is Nothing) _
17222                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
17223                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
17224                 End If
17225                 If ((Not (Me.Adapter) Is Nothing) _
17226                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
17227                     Me.Adapter.InsertCommand.Transaction = Me._transaction
17228                 End If
17229                 If ((Not (Me.Adapter) Is Nothing) _
17230                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
17231                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
17232                 End If
17233             End Set
17234         End Property
17235         
17236         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17237          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17238         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
17239             Get
17240                 If (Me._commandCollection Is Nothing) Then
17241                     Me.InitCommandCollection
17242                 End If
17243                 Return Me._commandCollection
17244             End Get
17245         End Property
17246         
17247         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17248          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17249         Public Property ClearBeforeFill() As Boolean
17250             Get
17251                 Return Me._clearBeforeFill
17252             End Get
17253             Set
17254                 Me._clearBeforeFill = value
17255             End Set
17256         End Property
17257         
17258         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17259          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17260         Private Sub InitAdapter()
17261             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
17262             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
17263             tableMapping.SourceTable = "Table"
17264             tableMapping.DataSetTable = "R_Table"
17265             tableMapping.ColumnMappings.Add("TableNo", "TableNo")
17266             tableMapping.ColumnMappings.Add("Status", "Status")
17267             tableMapping.ColumnMappings.Add("InventoryType", "InventoryType")
17268             Me._adapter.TableMappings.Add(tableMapping)
17269             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
17270             Me._adapter.DeleteCommand.Connection = Me.Connection
17271             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `R_Table` WHERE ((`TableNo` = ?) AND ((? = 1 AND `Status` IS NULL) OR"& _
17272                 " (`Status` = ?)) AND ((? = 1 AND `InventoryType` IS NULL) OR (`InventoryType` = "& _
17273                 "?)))"
17274             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
17275             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
17276             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Status", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Original, true, Nothing))
17277             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Status", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Original, false, Nothing))
17278             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_InventoryType", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Original, true, Nothing))
17279             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_InventoryType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Original, false, Nothing))
17280             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
17281             Me._adapter.InsertCommand.Connection = Me.Connection
17282             Me._adapter.InsertCommand.CommandText = "INSERT INTO `R_Table` (`TableNo`, `Status`, `InventoryType`) VALUES (?, ?, ?)"
17283             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
17284             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
17285             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Status", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Current, false, Nothing))
17286             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("InventoryType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Current, false, Nothing))
17287             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
17288             Me._adapter.UpdateCommand.Connection = Me.Connection
17289             Me._adapter.UpdateCommand.CommandText = "UPDATE `R_Table` SET `TableNo` = ?, `Status` = ?, `InventoryType` = ? WHERE ((`Ta"& _
17290                 "bleNo` = ?) AND ((? = 1 AND `Status` IS NULL) OR (`Status` = ?)) AND ((? = 1 AND"& _
17291                 " `InventoryType` IS NULL) OR (`InventoryType` = ?)))"
17292             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
17293             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
17294             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Status", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Current, false, Nothing))
17295             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("InventoryType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Current, false, Nothing))
17296             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
17297             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Status", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Original, true, Nothing))
17298             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Status", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Status", Global.System.Data.DataRowVersion.Original, false, Nothing))
17299             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_InventoryType", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Original, true, Nothing))
17300             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_InventoryType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "InventoryType", Global.System.Data.DataRowVersion.Original, false, Nothing))
17301         End Sub
17302         
17303         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17304          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17305         Private Sub InitConnection()
17306             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
17307             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
17308         End Sub
17309         
17310         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17311          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17312         Private Sub InitCommandCollection()
17313             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
17314             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
17315             Me._commandCollection(0).Connection = Me.Connection
17316             Me._commandCollection(0).CommandText = "SELECT TableNo, Status, InventoryType FROM R_Table"
17317             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
17318         End Sub
17319         
17320         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17321          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17322          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17323          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
17324         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.R_TableDataTable) As Integer
17325             Me.Adapter.SelectCommand = Me.CommandCollection(0)
17326             If (Me.ClearBeforeFill = true) Then
17327                 dataTable.Clear
17328             End If
17329             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
17330             Return returnValue
17331         End Function
17332         
17333         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17334          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17335          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17336          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
17337         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.R_TableDataTable
17338             Me.Adapter.SelectCommand = Me.CommandCollection(0)
17339             Dim dataTable As RPOS_DBDataSet.R_TableDataTable = New RPOS_DBDataSet.R_TableDataTable()
17340             Me.Adapter.Fill(dataTable)
17341             Return dataTable
17342         End Function
17343         
17344         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17345          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17346          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
17347         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.R_TableDataTable) As Integer
17348             Return Me.Adapter.Update(dataTable)
17349         End Function
17350         
17351         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17352          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17353          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
17354         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
17355             Return Me.Adapter.Update(dataSet, "R_Table")
17356         End Function
17357         
17358         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17359          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17360          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
17361         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
17362             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
17363         End Function
17364         
17365         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17366          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17367          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
17368         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
17369             Return Me.Adapter.Update(dataRows)
17370         End Function
17371         
17372         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17373          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17374          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17375          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
17376         Public Overloads Overridable Function Delete(ByVal Original_TableNo As String, ByVal Original_Status As String, ByVal Original_InventoryType As String) As Integer
17377             If (Original_TableNo Is Nothing) Then
17378                 Me.Adapter.DeleteCommand.Parameters(0).Value = Global.System.DBNull.Value
17379             Else
17380                 Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_TableNo,String)
17381             End If
17382             If (Original_Status Is Nothing) Then
17383                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
17384                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
17385             Else
17386                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
17387                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_Status,String)
17388             End If
17389             If (Original_InventoryType Is Nothing) Then
17390                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
17391                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
17392             Else
17393                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
17394                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_InventoryType,String)
17395             End If
17396             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
17397             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
17398                         <> Global.System.Data.ConnectionState.Open) Then
17399                 Me.Adapter.DeleteCommand.Connection.Open
17400             End If
17401             Try
17402                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
17403                 Return returnValue
17404             Finally
17405                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
17406                     Me.Adapter.DeleteCommand.Connection.Close
17407                 End If
17408             End Try
17409         End Function
17410         
17411         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17412          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17413          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17414          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
17415         Public Overloads Overridable Function Insert(ByVal TableNo As String, ByVal Status As String, ByVal InventoryType As String) As Integer
17416             If (TableNo Is Nothing) Then
17417                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
17418             Else
17419                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(TableNo,String)
17420             End If
17421             If (Status Is Nothing) Then
17422                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
17423             Else
17424                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(Status,String)
17425             End If
17426             If (InventoryType Is Nothing) Then
17427                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
17428             Else
17429                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(InventoryType,String)
17430             End If
17431             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
17432             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
17433                         <> Global.System.Data.ConnectionState.Open) Then
17434                 Me.Adapter.InsertCommand.Connection.Open
17435             End If
17436             Try
17437                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
17438                 Return returnValue
17439             Finally
17440                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
17441                     Me.Adapter.InsertCommand.Connection.Close
17442                 End If
17443             End Try
17444         End Function
17445         
17446         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17447          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17448          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17449          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
17450         Public Overloads Overridable Function Update(ByVal TableNo As String, ByVal Status As String, ByVal InventoryType As String, ByVal Original_TableNo As String, ByVal Original_Status As String, ByVal Original_InventoryType As String) As Integer
17451             If (TableNo Is Nothing) Then
17452                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
17453             Else
17454                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(TableNo,String)
17455             End If
17456             If (Status Is Nothing) Then
17457                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
17458             Else
17459                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Status,String)
17460             End If
17461             If (InventoryType Is Nothing) Then
17462                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
17463             Else
17464                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(InventoryType,String)
17465             End If
17466             If (Original_TableNo Is Nothing) Then
17467                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
17468             Else
17469                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(Original_TableNo,String)
17470             End If
17471             If (Original_Status Is Nothing) Then
17472                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(1,Object)
17473                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
17474             Else
17475                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(0,Object)
17476                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(Original_Status,String)
17477             End If
17478             If (Original_InventoryType Is Nothing) Then
17479                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(1,Object)
17480                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
17481             Else
17482                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(0,Object)
17483                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(Original_InventoryType,String)
17484             End If
17485             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
17486             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
17487                         <> Global.System.Data.ConnectionState.Open) Then
17488                 Me.Adapter.UpdateCommand.Connection.Open
17489             End If
17490             Try
17491                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
17492                 Return returnValue
17493             Finally
17494                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
17495                     Me.Adapter.UpdateCommand.Connection.Close
17496                 End If
17497             End Try
17498         End Function
17499         
17500         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17501          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17502          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17503          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
17504         Public Overloads Overridable Function Update(ByVal Status As String, ByVal InventoryType As String, ByVal Original_TableNo As String, ByVal Original_Status As String, ByVal Original_InventoryType As String) As Integer
17505             Return Me.Update(Original_TableNo, Status, InventoryType, Original_TableNo, Original_Status, Original_InventoryType)
17506         End Function
17507     End Class
17508     
17509     '''<summary>
17510     '''Represents the connection and commands used to retrieve and save data.
17511     '''</summary>
17512     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
17513      Global.System.ComponentModel.ToolboxItem(true), _
17514      Global.System.ComponentModel.DataObjectAttribute(true), _
17515      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
17516         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
17517      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
17518     Partial Public Class RegistrationTableAdapter
17519         Inherits Global.System.ComponentModel.Component
17520         
17521         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
17522         
17523         Private _connection As Global.System.Data.OleDb.OleDbConnection
17524         
17525         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
17526         
17527         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
17528         
17529         Private _clearBeforeFill As Boolean
17530         
17531         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17532          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17533         Public Sub New()
17534             MyBase.New
17535             Me.ClearBeforeFill = true
17536         End Sub
17537         
17538         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17539          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17540         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
17541             Get
17542                 If (Me._adapter Is Nothing) Then
17543                     Me.InitAdapter
17544                 End If
17545                 Return Me._adapter
17546             End Get
17547         End Property
17548         
17549         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17550          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17551         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
17552             Get
17553                 If (Me._connection Is Nothing) Then
17554                     Me.InitConnection
17555                 End If
17556                 Return Me._connection
17557             End Get
17558             Set
17559                 Me._connection = value
17560                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
17561                     Me.Adapter.InsertCommand.Connection = value
17562                 End If
17563                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
17564                     Me.Adapter.DeleteCommand.Connection = value
17565                 End If
17566                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
17567                     Me.Adapter.UpdateCommand.Connection = value
17568                 End If
17569                 Dim i As Integer = 0
17570                 Do While (i < Me.CommandCollection.Length)
17571                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
17572                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
17573                     End If
17574                     i = (i + 1)
17575                 Loop
17576             End Set
17577         End Property
17578         
17579         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17580          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17581         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
17582             Get
17583                 Return Me._transaction
17584             End Get
17585             Set
17586                 Me._transaction = value
17587                 Dim i As Integer = 0
17588                 Do While (i < Me.CommandCollection.Length)
17589                     Me.CommandCollection(i).Transaction = Me._transaction
17590                     i = (i + 1)
17591                 Loop
17592                 If ((Not (Me.Adapter) Is Nothing) _
17593                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
17594                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
17595                 End If
17596                 If ((Not (Me.Adapter) Is Nothing) _
17597                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
17598                     Me.Adapter.InsertCommand.Transaction = Me._transaction
17599                 End If
17600                 If ((Not (Me.Adapter) Is Nothing) _
17601                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
17602                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
17603                 End If
17604             End Set
17605         End Property
17606         
17607         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17608          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17609         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
17610             Get
17611                 If (Me._commandCollection Is Nothing) Then
17612                     Me.InitCommandCollection
17613                 End If
17614                 Return Me._commandCollection
17615             End Get
17616         End Property
17617         
17618         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17619          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17620         Public Property ClearBeforeFill() As Boolean
17621             Get
17622                 Return Me._clearBeforeFill
17623             End Get
17624             Set
17625                 Me._clearBeforeFill = value
17626             End Set
17627         End Property
17628         
17629         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17630          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17631         Private Sub InitAdapter()
17632             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
17633             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
17634             tableMapping.SourceTable = "Table"
17635             tableMapping.DataSetTable = "Registration"
17636             tableMapping.ColumnMappings.Add("UserID", "UserID")
17637             tableMapping.ColumnMappings.Add("UserType", "UserType")
17638             tableMapping.ColumnMappings.Add("Password", "Password")
17639             tableMapping.ColumnMappings.Add("RegisteredName", "RegisteredName")
17640             tableMapping.ColumnMappings.Add("ContactNo", "ContactNo")
17641             tableMapping.ColumnMappings.Add("EmailID", "EmailID")
17642             tableMapping.ColumnMappings.Add("JoiningDate", "JoiningDate")
17643             tableMapping.ColumnMappings.Add("Active", "Active")
17644             Me._adapter.TableMappings.Add(tableMapping)
17645             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
17646             Me._adapter.DeleteCommand.Connection = Me.Connection
17647             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `Registration` WHERE ((`UserID` = ?) AND ((? = 1 AND `UserType` IS NU"& _
17648                 "LL) OR (`UserType` = ?)) AND ((? = 1 AND `Password` IS NULL) OR (`Password` = ?)"& _
17649                 ") AND ((? = 1 AND `RegisteredName` IS NULL) OR (`RegisteredName` = ?)) AND ((? ="& _
17650                 " 1 AND `ContactNo` IS NULL) OR (`ContactNo` = ?)) AND ((? = 1 AND `EmailID` IS N"& _
17651                 "ULL) OR (`EmailID` = ?)) AND ((? = 1 AND `JoiningDate` IS NULL) OR (`JoiningDate"& _
17652                 "` = ?)) AND ((? = 1 AND `Active` IS NULL) OR (`Active` = ?)))"
17653             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
17654             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_UserID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserID", Global.System.Data.DataRowVersion.Original, false, Nothing))
17655             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_UserType", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserType", Global.System.Data.DataRowVersion.Original, true, Nothing))
17656             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_UserType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserType", Global.System.Data.DataRowVersion.Original, false, Nothing))
17657             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Password", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Password", Global.System.Data.DataRowVersion.Original, true, Nothing))
17658             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Password", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Password", Global.System.Data.DataRowVersion.Original, false, Nothing))
17659             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_RegisteredName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "RegisteredName", Global.System.Data.DataRowVersion.Original, true, Nothing))
17660             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_RegisteredName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "RegisteredName", Global.System.Data.DataRowVersion.Original, false, Nothing))
17661             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ContactNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
17662             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
17663             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_EmailID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Original, true, Nothing))
17664             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_EmailID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Original, false, Nothing))
17665             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_JoiningDate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "JoiningDate", Global.System.Data.DataRowVersion.Original, true, Nothing))
17666             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_JoiningDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "JoiningDate", Global.System.Data.DataRowVersion.Original, false, Nothing))
17667             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Active", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Active", Global.System.Data.DataRowVersion.Original, true, Nothing))
17668             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Active", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Active", Global.System.Data.DataRowVersion.Original, false, Nothing))
17669             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
17670             Me._adapter.InsertCommand.Connection = Me.Connection
17671             Me._adapter.InsertCommand.CommandText = "INSERT INTO `Registration` (`UserID`, `UserType`, `Password`, `RegisteredName`, `"& _
17672                 "ContactNo`, `EmailID`, `JoiningDate`, `Active`) VALUES (?, ?, ?, ?, ?, ?, ?, ?)"
17673             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
17674             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("UserID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserID", Global.System.Data.DataRowVersion.Current, false, Nothing))
17675             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("UserType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserType", Global.System.Data.DataRowVersion.Current, false, Nothing))
17676             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Password", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Password", Global.System.Data.DataRowVersion.Current, false, Nothing))
17677             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("RegisteredName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "RegisteredName", Global.System.Data.DataRowVersion.Current, false, Nothing))
17678             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
17679             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("EmailID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Current, false, Nothing))
17680             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("JoiningDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "JoiningDate", Global.System.Data.DataRowVersion.Current, false, Nothing))
17681             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Active", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Active", Global.System.Data.DataRowVersion.Current, false, Nothing))
17682             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
17683             Me._adapter.UpdateCommand.Connection = Me.Connection
17684             Me._adapter.UpdateCommand.CommandText = "UPDATE `Registration` SET `UserID` = ?, `UserType` = ?, `Password` = ?, `Register"& _
17685                 "edName` = ?, `ContactNo` = ?, `EmailID` = ?, `JoiningDate` = ?, `Active` = ? WHE"& _
17686                 "RE ((`UserID` = ?) AND ((? = 1 AND `UserType` IS NULL) OR (`UserType` = ?)) AND "& _
17687                 "((? = 1 AND `Password` IS NULL) OR (`Password` = ?)) AND ((? = 1 AND `Registered"& _
17688                 "Name` IS NULL) OR (`RegisteredName` = ?)) AND ((? = 1 AND `ContactNo` IS NULL) O"& _
17689                 "R (`ContactNo` = ?)) AND ((? = 1 AND `EmailID` IS NULL) OR (`EmailID` = ?)) AND "& _
17690                 "((? = 1 AND `JoiningDate` IS NULL) OR (`JoiningDate` = ?)) AND ((? = 1 AND `Acti"& _
17691                 "ve` IS NULL) OR (`Active` = ?)))"
17692             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
17693             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("UserID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserID", Global.System.Data.DataRowVersion.Current, false, Nothing))
17694             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("UserType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserType", Global.System.Data.DataRowVersion.Current, false, Nothing))
17695             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Password", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Password", Global.System.Data.DataRowVersion.Current, false, Nothing))
17696             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("RegisteredName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "RegisteredName", Global.System.Data.DataRowVersion.Current, false, Nothing))
17697             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
17698             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("EmailID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Current, false, Nothing))
17699             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("JoiningDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "JoiningDate", Global.System.Data.DataRowVersion.Current, false, Nothing))
17700             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Active", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Active", Global.System.Data.DataRowVersion.Current, false, Nothing))
17701             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_UserID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserID", Global.System.Data.DataRowVersion.Original, false, Nothing))
17702             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_UserType", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserType", Global.System.Data.DataRowVersion.Original, true, Nothing))
17703             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_UserType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "UserType", Global.System.Data.DataRowVersion.Original, false, Nothing))
17704             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Password", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Password", Global.System.Data.DataRowVersion.Original, true, Nothing))
17705             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Password", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Password", Global.System.Data.DataRowVersion.Original, false, Nothing))
17706             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_RegisteredName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "RegisteredName", Global.System.Data.DataRowVersion.Original, true, Nothing))
17707             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_RegisteredName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "RegisteredName", Global.System.Data.DataRowVersion.Original, false, Nothing))
17708             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ContactNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
17709             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
17710             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_EmailID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Original, true, Nothing))
17711             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_EmailID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "EmailID", Global.System.Data.DataRowVersion.Original, false, Nothing))
17712             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_JoiningDate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "JoiningDate", Global.System.Data.DataRowVersion.Original, true, Nothing))
17713             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_JoiningDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "JoiningDate", Global.System.Data.DataRowVersion.Original, false, Nothing))
17714             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Active", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Active", Global.System.Data.DataRowVersion.Original, true, Nothing))
17715             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Active", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Active", Global.System.Data.DataRowVersion.Original, false, Nothing))
17716         End Sub
17717         
17718         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17719          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17720         Private Sub InitConnection()
17721             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
17722             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
17723         End Sub
17724         
17725         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17726          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
17727         Private Sub InitCommandCollection()
17728             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
17729             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
17730             Me._commandCollection(0).Connection = Me.Connection
17731             Me._commandCollection(0).CommandText = "SELECT UserID, UserType, [Password], RegisteredName, ContactNo, EmailID, JoiningD"& _
17732                 "ate, Active FROM Registration"
17733             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
17734         End Sub
17735         
17736         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17737          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17738          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17739          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
17740         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.RegistrationDataTable) As Integer
17741             Me.Adapter.SelectCommand = Me.CommandCollection(0)
17742             If (Me.ClearBeforeFill = true) Then
17743                 dataTable.Clear
17744             End If
17745             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
17746             Return returnValue
17747         End Function
17748         
17749         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17750          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17751          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17752          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
17753         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.RegistrationDataTable
17754             Me.Adapter.SelectCommand = Me.CommandCollection(0)
17755             Dim dataTable As RPOS_DBDataSet.RegistrationDataTable = New RPOS_DBDataSet.RegistrationDataTable()
17756             Me.Adapter.Fill(dataTable)
17757             Return dataTable
17758         End Function
17759         
17760         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17761          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17762          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
17763         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.RegistrationDataTable) As Integer
17764             Return Me.Adapter.Update(dataTable)
17765         End Function
17766         
17767         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17768          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17769          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
17770         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
17771             Return Me.Adapter.Update(dataSet, "Registration")
17772         End Function
17773         
17774         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17775          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17776          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
17777         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
17778             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
17779         End Function
17780         
17781         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17782          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17783          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
17784         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
17785             Return Me.Adapter.Update(dataRows)
17786         End Function
17787         
17788         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17789          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17790          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17791          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
17792         Public Overloads Overridable Function Delete(ByVal Original_UserID As String, ByVal Original_UserType As String, ByVal Original_Password As String, ByVal Original_RegisteredName As String, ByVal Original_ContactNo As String, ByVal Original_EmailID As String, ByVal Original_JoiningDate As Global.System.Nullable(Of Date), ByVal Original_Active As String) As Integer
17793             If (Original_UserID Is Nothing) Then
17794                 Me.Adapter.DeleteCommand.Parameters(0).Value = Global.System.DBNull.Value
17795             Else
17796                 Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_UserID,String)
17797             End If
17798             If (Original_UserType Is Nothing) Then
17799                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
17800                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
17801             Else
17802                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
17803                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_UserType,String)
17804             End If
17805             If (Original_Password Is Nothing) Then
17806                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
17807                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
17808             Else
17809                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
17810                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_Password,String)
17811             End If
17812             If (Original_RegisteredName Is Nothing) Then
17813                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
17814                 Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
17815             Else
17816                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
17817                 Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_RegisteredName,String)
17818             End If
17819             If (Original_ContactNo Is Nothing) Then
17820                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(1,Object)
17821                 Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
17822             Else
17823                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(0,Object)
17824                 Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_ContactNo,String)
17825             End If
17826             If (Original_EmailID Is Nothing) Then
17827                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(1,Object)
17828                 Me.Adapter.DeleteCommand.Parameters(10).Value = Global.System.DBNull.Value
17829             Else
17830                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(0,Object)
17831                 Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_EmailID,String)
17832             End If
17833             If (Original_JoiningDate.HasValue = true) Then
17834                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(0,Object)
17835                 Me.Adapter.DeleteCommand.Parameters(12).Value = CType(Original_JoiningDate.Value,Date)
17836             Else
17837                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(1,Object)
17838                 Me.Adapter.DeleteCommand.Parameters(12).Value = Global.System.DBNull.Value
17839             End If
17840             If (Original_Active Is Nothing) Then
17841                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(1,Object)
17842                 Me.Adapter.DeleteCommand.Parameters(14).Value = Global.System.DBNull.Value
17843             Else
17844                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(0,Object)
17845                 Me.Adapter.DeleteCommand.Parameters(14).Value = CType(Original_Active,String)
17846             End If
17847             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
17848             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
17849                         <> Global.System.Data.ConnectionState.Open) Then
17850                 Me.Adapter.DeleteCommand.Connection.Open
17851             End If
17852             Try
17853                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
17854                 Return returnValue
17855             Finally
17856                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
17857                     Me.Adapter.DeleteCommand.Connection.Close
17858                 End If
17859             End Try
17860         End Function
17861         
17862         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17863          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17864          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17865          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
17866         Public Overloads Overridable Function Insert(ByVal UserID As String, ByVal UserType As String, ByVal Password As String, ByVal RegisteredName As String, ByVal ContactNo As String, ByVal EmailID As String, ByVal JoiningDate As Global.System.Nullable(Of Date), ByVal Active As String) As Integer
17867             If (UserID Is Nothing) Then
17868                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
17869             Else
17870                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(UserID,String)
17871             End If
17872             If (UserType Is Nothing) Then
17873                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
17874             Else
17875                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(UserType,String)
17876             End If
17877             If (Password Is Nothing) Then
17878                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
17879             Else
17880                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(Password,String)
17881             End If
17882             If (RegisteredName Is Nothing) Then
17883                 Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
17884             Else
17885                 Me.Adapter.InsertCommand.Parameters(3).Value = CType(RegisteredName,String)
17886             End If
17887             If (ContactNo Is Nothing) Then
17888                 Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
17889             Else
17890                 Me.Adapter.InsertCommand.Parameters(4).Value = CType(ContactNo,String)
17891             End If
17892             If (EmailID Is Nothing) Then
17893                 Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
17894             Else
17895                 Me.Adapter.InsertCommand.Parameters(5).Value = CType(EmailID,String)
17896             End If
17897             If (JoiningDate.HasValue = true) Then
17898                 Me.Adapter.InsertCommand.Parameters(6).Value = CType(JoiningDate.Value,Date)
17899             Else
17900                 Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
17901             End If
17902             If (Active Is Nothing) Then
17903                 Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
17904             Else
17905                 Me.Adapter.InsertCommand.Parameters(7).Value = CType(Active,String)
17906             End If
17907             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
17908             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
17909                         <> Global.System.Data.ConnectionState.Open) Then
17910                 Me.Adapter.InsertCommand.Connection.Open
17911             End If
17912             Try
17913                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
17914                 Return returnValue
17915             Finally
17916                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
17917                     Me.Adapter.InsertCommand.Connection.Close
17918                 End If
17919             End Try
17920         End Function
17921         
17922         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
17923          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
17924          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
17925          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
17926         Public Overloads Overridable Function Update( _
17927                     ByVal UserID As String, _
17928                     ByVal UserType As String, _
17929                     ByVal Password As String, _
17930                     ByVal RegisteredName As String, _
17931                     ByVal ContactNo As String, _
17932                     ByVal EmailID As String, _
17933                     ByVal JoiningDate As Global.System.Nullable(Of Date), _
17934                     ByVal Active As String, _
17935                     ByVal Original_UserID As String, _
17936                     ByVal Original_UserType As String, _
17937                     ByVal Original_Password As String, _
17938                     ByVal Original_RegisteredName As String, _
17939                     ByVal Original_ContactNo As String, _
17940                     ByVal Original_EmailID As String, _
17941                     ByVal Original_JoiningDate As Global.System.Nullable(Of Date), _
17942                     ByVal Original_Active As String) As Integer
17943             If (UserID Is Nothing) Then
17944                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
17945             Else
17946                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(UserID,String)
17947             End If
17948             If (UserType Is Nothing) Then
17949                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
17950             Else
17951                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(UserType,String)
17952             End If
17953             If (Password Is Nothing) Then
17954                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
17955             Else
17956                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(Password,String)
17957             End If
17958             If (RegisteredName Is Nothing) Then
17959                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
17960             Else
17961                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(RegisteredName,String)
17962             End If
17963             If (ContactNo Is Nothing) Then
17964                 Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
17965             Else
17966                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(ContactNo,String)
17967             End If
17968             If (EmailID Is Nothing) Then
17969                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
17970             Else
17971                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(EmailID,String)
17972             End If
17973             If (JoiningDate.HasValue = true) Then
17974                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(JoiningDate.Value,Date)
17975             Else
17976                 Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
17977             End If
17978             If (Active Is Nothing) Then
17979                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
17980             Else
17981                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(Active,String)
17982             End If
17983             If (Original_UserID Is Nothing) Then
17984                 Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
17985             Else
17986                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(Original_UserID,String)
17987             End If
17988             If (Original_UserType Is Nothing) Then
17989                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(1,Object)
17990                 Me.Adapter.UpdateCommand.Parameters(10).Value = Global.System.DBNull.Value
17991             Else
17992                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(0,Object)
17993                 Me.Adapter.UpdateCommand.Parameters(10).Value = CType(Original_UserType,String)
17994             End If
17995             If (Original_Password Is Nothing) Then
17996                 Me.Adapter.UpdateCommand.Parameters(11).Value = CType(1,Object)
17997                 Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
17998             Else
17999                 Me.Adapter.UpdateCommand.Parameters(11).Value = CType(0,Object)
18000                 Me.Adapter.UpdateCommand.Parameters(12).Value = CType(Original_Password,String)
18001             End If
18002             If (Original_RegisteredName Is Nothing) Then
18003                 Me.Adapter.UpdateCommand.Parameters(13).Value = CType(1,Object)
18004                 Me.Adapter.UpdateCommand.Parameters(14).Value = Global.System.DBNull.Value
18005             Else
18006                 Me.Adapter.UpdateCommand.Parameters(13).Value = CType(0,Object)
18007                 Me.Adapter.UpdateCommand.Parameters(14).Value = CType(Original_RegisteredName,String)
18008             End If
18009             If (Original_ContactNo Is Nothing) Then
18010                 Me.Adapter.UpdateCommand.Parameters(15).Value = CType(1,Object)
18011                 Me.Adapter.UpdateCommand.Parameters(16).Value = Global.System.DBNull.Value
18012             Else
18013                 Me.Adapter.UpdateCommand.Parameters(15).Value = CType(0,Object)
18014                 Me.Adapter.UpdateCommand.Parameters(16).Value = CType(Original_ContactNo,String)
18015             End If
18016             If (Original_EmailID Is Nothing) Then
18017                 Me.Adapter.UpdateCommand.Parameters(17).Value = CType(1,Object)
18018                 Me.Adapter.UpdateCommand.Parameters(18).Value = Global.System.DBNull.Value
18019             Else
18020                 Me.Adapter.UpdateCommand.Parameters(17).Value = CType(0,Object)
18021                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(Original_EmailID,String)
18022             End If
18023             If (Original_JoiningDate.HasValue = true) Then
18024                 Me.Adapter.UpdateCommand.Parameters(19).Value = CType(0,Object)
18025                 Me.Adapter.UpdateCommand.Parameters(20).Value = CType(Original_JoiningDate.Value,Date)
18026             Else
18027                 Me.Adapter.UpdateCommand.Parameters(19).Value = CType(1,Object)
18028                 Me.Adapter.UpdateCommand.Parameters(20).Value = Global.System.DBNull.Value
18029             End If
18030             If (Original_Active Is Nothing) Then
18031                 Me.Adapter.UpdateCommand.Parameters(21).Value = CType(1,Object)
18032                 Me.Adapter.UpdateCommand.Parameters(22).Value = Global.System.DBNull.Value
18033             Else
18034                 Me.Adapter.UpdateCommand.Parameters(21).Value = CType(0,Object)
18035                 Me.Adapter.UpdateCommand.Parameters(22).Value = CType(Original_Active,String)
18036             End If
18037             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
18038             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
18039                         <> Global.System.Data.ConnectionState.Open) Then
18040                 Me.Adapter.UpdateCommand.Connection.Open
18041             End If
18042             Try
18043                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
18044                 Return returnValue
18045             Finally
18046                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
18047                     Me.Adapter.UpdateCommand.Connection.Close
18048                 End If
18049             End Try
18050         End Function
18051         
18052         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18053          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
18054          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
18055          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
18056         Public Overloads Overridable Function Update(ByVal UserType As String, ByVal Password As String, ByVal RegisteredName As String, ByVal ContactNo As String, ByVal EmailID As String, ByVal JoiningDate As Global.System.Nullable(Of Date), ByVal Active As String, ByVal Original_UserID As String, ByVal Original_UserType As String, ByVal Original_Password As String, ByVal Original_RegisteredName As String, ByVal Original_ContactNo As String, ByVal Original_EmailID As String, ByVal Original_JoiningDate As Global.System.Nullable(Of Date), ByVal Original_Active As String) As Integer
18057             Return Me.Update(Original_UserID, UserType, Password, RegisteredName, ContactNo, EmailID, JoiningDate, Active, Original_UserID, Original_UserType, Original_Password, Original_RegisteredName, Original_ContactNo, Original_EmailID, Original_JoiningDate, Original_Active)
18058         End Function
18059     End Class
18060     
18061     '''<summary>
18062     '''Represents the connection and commands used to retrieve and save data.
18063     '''</summary>
18064     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
18065      Global.System.ComponentModel.ToolboxItem(true), _
18066      Global.System.ComponentModel.DataObjectAttribute(true), _
18067      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
18068         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
18069      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
18070     Partial Public Class RestaurantBillingInfoTableAdapter
18071         Inherits Global.System.ComponentModel.Component
18072         
18073         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
18074         
18075         Private _connection As Global.System.Data.OleDb.OleDbConnection
18076         
18077         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
18078         
18079         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
18080         
18081         Private _clearBeforeFill As Boolean
18082         
18083         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18084          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
18085         Public Sub New()
18086             MyBase.New
18087             Me.ClearBeforeFill = true
18088         End Sub
18089         
18090         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18091          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
18092         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
18093             Get
18094                 If (Me._adapter Is Nothing) Then
18095                     Me.InitAdapter
18096                 End If
18097                 Return Me._adapter
18098             End Get
18099         End Property
18100         
18101         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18102          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
18103         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
18104             Get
18105                 If (Me._connection Is Nothing) Then
18106                     Me.InitConnection
18107                 End If
18108                 Return Me._connection
18109             End Get
18110             Set
18111                 Me._connection = value
18112                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
18113                     Me.Adapter.InsertCommand.Connection = value
18114                 End If
18115                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
18116                     Me.Adapter.DeleteCommand.Connection = value
18117                 End If
18118                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
18119                     Me.Adapter.UpdateCommand.Connection = value
18120                 End If
18121                 Dim i As Integer = 0
18122                 Do While (i < Me.CommandCollection.Length)
18123                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
18124                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
18125                     End If
18126                     i = (i + 1)
18127                 Loop
18128             End Set
18129         End Property
18130         
18131         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18132          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
18133         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
18134             Get
18135                 Return Me._transaction
18136             End Get
18137             Set
18138                 Me._transaction = value
18139                 Dim i As Integer = 0
18140                 Do While (i < Me.CommandCollection.Length)
18141                     Me.CommandCollection(i).Transaction = Me._transaction
18142                     i = (i + 1)
18143                 Loop
18144                 If ((Not (Me.Adapter) Is Nothing) _
18145                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
18146                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
18147                 End If
18148                 If ((Not (Me.Adapter) Is Nothing) _
18149                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
18150                     Me.Adapter.InsertCommand.Transaction = Me._transaction
18151                 End If
18152                 If ((Not (Me.Adapter) Is Nothing) _
18153                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
18154                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
18155                 End If
18156             End Set
18157         End Property
18158         
18159         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18160          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
18161         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
18162             Get
18163                 If (Me._commandCollection Is Nothing) Then
18164                     Me.InitCommandCollection
18165                 End If
18166                 Return Me._commandCollection
18167             End Get
18168         End Property
18169         
18170         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18171          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
18172         Public Property ClearBeforeFill() As Boolean
18173             Get
18174                 Return Me._clearBeforeFill
18175             End Get
18176             Set
18177                 Me._clearBeforeFill = value
18178             End Set
18179         End Property
18180         
18181         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18182          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
18183         Private Sub InitAdapter()
18184             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
18185             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
18186             tableMapping.SourceTable = "Table"
18187             tableMapping.DataSetTable = "RestaurantBillingInfo"
18188             tableMapping.ColumnMappings.Add("BillId", "BillId")
18189             tableMapping.ColumnMappings.Add("BillType", "BillType")
18190             tableMapping.ColumnMappings.Add("BillDate", "BillDate")
18191             tableMapping.ColumnMappings.Add("CustomerName", "CustomerName")
18192             tableMapping.ColumnMappings.Add("AddressLine1", "AddressLine1")
18193             tableMapping.ColumnMappings.Add("AddressLine2", "AddressLine2")
18194             tableMapping.ColumnMappings.Add("AddressLine3", "AddressLine3")
18195             tableMapping.ColumnMappings.Add("ContactNo", "ContactNo")
18196             tableMapping.ColumnMappings.Add("PaymentMode", "PaymentMode")
18197             tableMapping.ColumnMappings.Add("SubTotal", "SubTotal")
18198             tableMapping.ColumnMappings.Add("ItemDiscount", "ItemDiscount")
18199             tableMapping.ColumnMappings.Add("DiscountPer", "DiscountPer")
18200             tableMapping.ColumnMappings.Add("Discount", "Discount")
18201             tableMapping.ColumnMappings.Add("VAT", "VAT")
18202             tableMapping.ColumnMappings.Add("ServiceTax", "ServiceTax")
18203             tableMapping.ColumnMappings.Add("ServiceCharges", "ServiceCharges")
18204             tableMapping.ColumnMappings.Add("TACharges", "TACharges")
18205             tableMapping.ColumnMappings.Add("HDCharges", "HDCharges")
18206             tableMapping.ColumnMappings.Add("GrandTotal", "GrandTotal")
18207             tableMapping.ColumnMappings.Add("Cash", "Cash")
18208             tableMapping.ColumnMappings.Add("Change", "Change")
18209             tableMapping.ColumnMappings.Add("OperatorID", "OperatorID")
18210             tableMapping.ColumnMappings.Add("BillNote", "BillNote")
18211             Me._adapter.TableMappings.Add(tableMapping)
18212             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
18213             Me._adapter.DeleteCommand.Connection = Me.Connection
18214             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `RestaurantBillingInfo` WHERE ((`BillId` = ?) AND ((? = 1 AND `BillTy"& _
18215                 "pe` IS NULL) OR (`BillType` = ?)) AND ((? = 1 AND `BillDate` IS NULL) OR (`BillD"& _
18216                 "ate` = ?)) AND ((? = 1 AND `CustomerName` IS NULL) OR (`CustomerName` = ?)) AND "& _
18217                 "((? = 1 AND `AddressLine1` IS NULL) OR (`AddressLine1` = ?)) AND ((? = 1 AND `Ad"& _
18218                 "dressLine2` IS NULL) OR (`AddressLine2` = ?)) AND ((? = 1 AND `AddressLine3` IS "& _
18219                 "NULL) OR (`AddressLine3` = ?)) AND ((? = 1 AND `ContactNo` IS NULL) OR (`Contact"& _
18220                 "No` = ?)) AND ((? = 1 AND `PaymentMode` IS NULL) OR (`PaymentMode` = ?)) AND ((?"& _
18221                 " = 1 AND `SubTotal` IS NULL) OR (`SubTotal` = ?)) AND ((? = 1 AND `ItemDiscount`"& _
18222                 " IS NULL) OR (`ItemDiscount` = ?)) AND ((? = 1 AND `DiscountPer` IS NULL) OR (`D"& _
18223                 "iscountPer` = ?)) AND ((? = 1 AND `Discount` IS NULL) OR (`Discount` = ?)) AND ("& _
18224                 "(? = 1 AND `VAT` IS NULL) OR (`VAT` = ?)) AND ((? = 1 AND `ServiceTax` IS NULL) "& _
18225                 "OR (`ServiceTax` = ?)) AND ((? = 1 AND `ServiceCharges` IS NULL) OR (`ServiceCha"& _
18226                 "rges` = ?)) AND ((? = 1 AND `TACharges` IS NULL) OR (`TACharges` = ?)) AND ((? ="& _
18227                 " 1 AND `HDCharges` IS NULL) OR (`HDCharges` = ?)) AND ((? = 1 AND `GrandTotal` I"& _
18228                 "S NULL) OR (`GrandTotal` = ?)) AND ((? = 1 AND `Cash` IS NULL) OR (`Cash` = ?)) "& _
18229                 "AND ((? = 1 AND `Change` IS NULL) OR (`Change` = ?)) AND ((? = 1 AND `OperatorID"& _
18230                 "` IS NULL) OR (`OperatorID` = ?)) AND ((? = 1 AND `BillNote` IS NULL) OR (`BillN"& _
18231                 "ote` = ?)))"
18232             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
18233             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillId", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillId", Global.System.Data.DataRowVersion.Original, false, Nothing))
18234             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BillType", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillType", Global.System.Data.DataRowVersion.Original, true, Nothing))
18235             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillType", Global.System.Data.DataRowVersion.Original, false, Nothing))
18236             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BillDate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Original, true, Nothing))
18237             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Original, false, Nothing))
18238             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_CustomerName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CustomerName", Global.System.Data.DataRowVersion.Original, true, Nothing))
18239             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_CustomerName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CustomerName", Global.System.Data.DataRowVersion.Original, false, Nothing))
18240             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine1", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Original, true, Nothing))
18241             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine1", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Original, false, Nothing))
18242             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine2", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Original, true, Nothing))
18243             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Original, false, Nothing))
18244             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine3", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Original, true, Nothing))
18245             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine3", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Original, false, Nothing))
18246             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ContactNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
18247             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
18248             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_PaymentMode", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PaymentMode", Global.System.Data.DataRowVersion.Original, true, Nothing))
18249             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_PaymentMode", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PaymentMode", Global.System.Data.DataRowVersion.Original, false, Nothing))
18250             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SubTotal", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SubTotal", Global.System.Data.DataRowVersion.Original, true, Nothing))
18251             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SubTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SubTotal", Global.System.Data.DataRowVersion.Original, false, Nothing))
18252             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ItemDiscount", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemDiscount", Global.System.Data.DataRowVersion.Original, true, Nothing))
18253             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ItemDiscount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ItemDiscount", Global.System.Data.DataRowVersion.Original, false, Nothing))
18254             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_DiscountPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "DiscountPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
18255             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_DiscountPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscountPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
18256             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Discount", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Discount", Global.System.Data.DataRowVersion.Original, true, Nothing))
18257             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Discount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Discount", Global.System.Data.DataRowVersion.Original, false, Nothing))
18258             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VAT", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VAT", Global.System.Data.DataRowVersion.Original, true, Nothing))
18259             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VAT", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VAT", Global.System.Data.DataRowVersion.Original, false, Nothing))
18260             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ServiceTax", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ServiceTax", Global.System.Data.DataRowVersion.Original, true, Nothing))
18261             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ServiceTax", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ServiceTax", Global.System.Data.DataRowVersion.Original, false, Nothing))
18262             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ServiceCharges", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ServiceCharges", Global.System.Data.DataRowVersion.Original, true, Nothing))
18263             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ServiceCharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ServiceCharges", Global.System.Data.DataRowVersion.Original, false, Nothing))
18264             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TACharges", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TACharges", Global.System.Data.DataRowVersion.Original, true, Nothing))
18265             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TACharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TACharges", Global.System.Data.DataRowVersion.Original, false, Nothing))
18266             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_HDCharges", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HDCharges", Global.System.Data.DataRowVersion.Original, true, Nothing))
18267             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_HDCharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "HDCharges", Global.System.Data.DataRowVersion.Original, false, Nothing))
18268             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_GrandTotal", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Original, true, Nothing))
18269             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_GrandTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Original, false, Nothing))
18270             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Cash", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Cash", Global.System.Data.DataRowVersion.Original, true, Nothing))
18271             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Cash", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Cash", Global.System.Data.DataRowVersion.Original, false, Nothing))
18272             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Change", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Change", Global.System.Data.DataRowVersion.Original, true, Nothing))
18273             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Change", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Change", Global.System.Data.DataRowVersion.Original, false, Nothing))
18274             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_OperatorID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Original, true, Nothing))
18275             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_OperatorID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Original, false, Nothing))
18276             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BillNote", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Original, true, Nothing))
18277             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Original, false, Nothing))
18278             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
18279             Me._adapter.InsertCommand.Connection = Me.Connection
18280             Me._adapter.InsertCommand.CommandText = "INSERT INTO `RestaurantBillingInfo` (`BillId`, `BillType`, `BillDate`, `CustomerN"& _
18281                 "ame`, `AddressLine1`, `AddressLine2`, `AddressLine3`, `ContactNo`, `PaymentMode`"& _
18282                 ", `SubTotal`, `ItemDiscount`, `DiscountPer`, `Discount`, `VAT`, `ServiceTax`, `S"& _
18283                 "erviceCharges`, `TACharges`, `HDCharges`, `GrandTotal`, `Cash`, `Change`, `Opera"& _
18284                 "torID`, `BillNote`) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?"& _
18285                 ", ?, ?, ?, ?, ?)"
18286             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
18287             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillId", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillId", Global.System.Data.DataRowVersion.Current, false, Nothing))
18288             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillType", Global.System.Data.DataRowVersion.Current, false, Nothing))
18289             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Current, false, Nothing))
18290             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("CustomerName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CustomerName", Global.System.Data.DataRowVersion.Current, false, Nothing))
18291             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine1", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Current, false, Nothing))
18292             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Current, false, Nothing))
18293             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine3", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Current, false, Nothing))
18294             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
18295             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("PaymentMode", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PaymentMode", Global.System.Data.DataRowVersion.Current, false, Nothing))
18296             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SubTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SubTotal", Global.System.Data.DataRowVersion.Current, false, Nothing))
18297             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ItemDiscount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ItemDiscount", Global.System.Data.DataRowVersion.Current, false, Nothing))
18298             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("DiscountPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscountPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
18299             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Discount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Discount", Global.System.Data.DataRowVersion.Current, false, Nothing))
18300             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VAT", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VAT", Global.System.Data.DataRowVersion.Current, false, Nothing))
18301             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ServiceTax", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ServiceTax", Global.System.Data.DataRowVersion.Current, false, Nothing))
18302             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ServiceCharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ServiceCharges", Global.System.Data.DataRowVersion.Current, false, Nothing))
18303             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TACharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TACharges", Global.System.Data.DataRowVersion.Current, false, Nothing))
18304             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("HDCharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "HDCharges", Global.System.Data.DataRowVersion.Current, false, Nothing))
18305             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("GrandTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Current, false, Nothing))
18306             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Cash", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Cash", Global.System.Data.DataRowVersion.Current, false, Nothing))
18307             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Change", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Change", Global.System.Data.DataRowVersion.Current, false, Nothing))
18308             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("OperatorID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Current, false, Nothing))
18309             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Current, false, Nothing))
18310             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
18311             Me._adapter.UpdateCommand.Connection = Me.Connection
18312             Me._adapter.UpdateCommand.CommandText = "UPDATE `RestaurantBillingInfo` SET `BillId` = ?, `BillType` = ?, `BillDate` = ?, "& _
18313                 "`CustomerName` = ?, `AddressLine1` = ?, `AddressLine2` = ?, `AddressLine3` = ?, "& _
18314                 "`ContactNo` = ?, `PaymentMode` = ?, `SubTotal` = ?, `ItemDiscount` = ?, `Discoun"& _
18315                 "tPer` = ?, `Discount` = ?, `VAT` = ?, `ServiceTax` = ?, `ServiceCharges` = ?, `T"& _
18316                 "ACharges` = ?, `HDCharges` = ?, `GrandTotal` = ?, `Cash` = ?, `Change` = ?, `Ope"& _
18317                 "ratorID` = ?, `BillNote` = ? WHERE ((`BillId` = ?) AND ((? = 1 AND `BillType` IS"& _
18318                 " NULL) OR (`BillType` = ?)) AND ((? = 1 AND `BillDate` IS NULL) OR (`BillDate` ="& _
18319                 " ?)) AND ((? = 1 AND `CustomerName` IS NULL) OR (`CustomerName` = ?)) AND ((? = "& _
18320                 "1 AND `AddressLine1` IS NULL) OR (`AddressLine1` = ?)) AND ((? = 1 AND `AddressL"& _
18321                 "ine2` IS NULL) OR (`AddressLine2` = ?)) AND ((? = 1 AND `AddressLine3` IS NULL) "& _
18322                 "OR (`AddressLine3` = ?)) AND ((? = 1 AND `ContactNo` IS NULL) OR (`ContactNo` = "& _
18323                 "?)) AND ((? = 1 AND `PaymentMode` IS NULL) OR (`PaymentMode` = ?)) AND ((? = 1 A"& _
18324                 "ND `SubTotal` IS NULL) OR (`SubTotal` = ?)) AND ((? = 1 AND `ItemDiscount` IS NU"& _
18325                 "LL) OR (`ItemDiscount` = ?)) AND ((? = 1 AND `DiscountPer` IS NULL) OR (`Discoun"& _
18326                 "tPer` = ?)) AND ((? = 1 AND `Discount` IS NULL) OR (`Discount` = ?)) AND ((? = 1"& _
18327                 " AND `VAT` IS NULL) OR (`VAT` = ?)) AND ((? = 1 AND `ServiceTax` IS NULL) OR (`S"& _
18328                 "erviceTax` = ?)) AND ((? = 1 AND `ServiceCharges` IS NULL) OR (`ServiceCharges` "& _
18329                 "= ?)) AND ((? = 1 AND `TACharges` IS NULL) OR (`TACharges` = ?)) AND ((? = 1 AND"& _
18330                 " `HDCharges` IS NULL) OR (`HDCharges` = ?)) AND ((? = 1 AND `GrandTotal` IS NULL"& _
18331                 ") OR (`GrandTotal` = ?)) AND ((? = 1 AND `Cash` IS NULL) OR (`Cash` = ?)) AND (("& _
18332                 "? = 1 AND `Change` IS NULL) OR (`Change` = ?)) AND ((? = 1 AND `OperatorID` IS N"& _
18333                 "ULL) OR (`OperatorID` = ?)) AND ((? = 1 AND `BillNote` IS NULL) OR (`BillNote` ="& _
18334                 " ?)))"
18335             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
18336             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillId", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillId", Global.System.Data.DataRowVersion.Current, false, Nothing))
18337             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillType", Global.System.Data.DataRowVersion.Current, false, Nothing))
18338             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Current, false, Nothing))
18339             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("CustomerName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CustomerName", Global.System.Data.DataRowVersion.Current, false, Nothing))
18340             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine1", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Current, false, Nothing))
18341             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Current, false, Nothing))
18342             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("AddressLine3", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Current, false, Nothing))
18343             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
18344             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("PaymentMode", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PaymentMode", Global.System.Data.DataRowVersion.Current, false, Nothing))
18345             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SubTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SubTotal", Global.System.Data.DataRowVersion.Current, false, Nothing))
18346             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ItemDiscount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ItemDiscount", Global.System.Data.DataRowVersion.Current, false, Nothing))
18347             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("DiscountPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscountPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
18348             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Discount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Discount", Global.System.Data.DataRowVersion.Current, false, Nothing))
18349             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VAT", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VAT", Global.System.Data.DataRowVersion.Current, false, Nothing))
18350             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ServiceTax", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ServiceTax", Global.System.Data.DataRowVersion.Current, false, Nothing))
18351             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ServiceCharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ServiceCharges", Global.System.Data.DataRowVersion.Current, false, Nothing))
18352             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TACharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TACharges", Global.System.Data.DataRowVersion.Current, false, Nothing))
18353             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("HDCharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "HDCharges", Global.System.Data.DataRowVersion.Current, false, Nothing))
18354             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("GrandTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Current, false, Nothing))
18355             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Cash", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Cash", Global.System.Data.DataRowVersion.Current, false, Nothing))
18356             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Change", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Change", Global.System.Data.DataRowVersion.Current, false, Nothing))
18357             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("OperatorID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Current, false, Nothing))
18358             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("BillNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Current, false, Nothing))
18359             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillId", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillId", Global.System.Data.DataRowVersion.Original, false, Nothing))
18360             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BillType", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillType", Global.System.Data.DataRowVersion.Original, true, Nothing))
18361             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillType", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillType", Global.System.Data.DataRowVersion.Original, false, Nothing))
18362             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BillDate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Original, true, Nothing))
18363             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillDate", Global.System.Data.OleDb.OleDbType.[Date], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillDate", Global.System.Data.DataRowVersion.Original, false, Nothing))
18364             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_CustomerName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CustomerName", Global.System.Data.DataRowVersion.Original, true, Nothing))
18365             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_CustomerName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "CustomerName", Global.System.Data.DataRowVersion.Original, false, Nothing))
18366             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine1", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Original, true, Nothing))
18367             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine1", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine1", Global.System.Data.DataRowVersion.Original, false, Nothing))
18368             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine2", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Original, true, Nothing))
18369             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine2", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine2", Global.System.Data.DataRowVersion.Original, false, Nothing))
18370             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_AddressLine3", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Original, true, Nothing))
18371             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_AddressLine3", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "AddressLine3", Global.System.Data.DataRowVersion.Original, false, Nothing))
18372             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ContactNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
18373             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ContactNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ContactNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
18374             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_PaymentMode", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PaymentMode", Global.System.Data.DataRowVersion.Original, true, Nothing))
18375             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_PaymentMode", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "PaymentMode", Global.System.Data.DataRowVersion.Original, false, Nothing))
18376             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SubTotal", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SubTotal", Global.System.Data.DataRowVersion.Original, true, Nothing))
18377             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SubTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SubTotal", Global.System.Data.DataRowVersion.Original, false, Nothing))
18378             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ItemDiscount", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemDiscount", Global.System.Data.DataRowVersion.Original, true, Nothing))
18379             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ItemDiscount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ItemDiscount", Global.System.Data.DataRowVersion.Original, false, Nothing))
18380             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_DiscountPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "DiscountPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
18381             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_DiscountPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscountPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
18382             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Discount", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Discount", Global.System.Data.DataRowVersion.Original, true, Nothing))
18383             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Discount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Discount", Global.System.Data.DataRowVersion.Original, false, Nothing))
18384             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VAT", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VAT", Global.System.Data.DataRowVersion.Original, true, Nothing))
18385             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VAT", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VAT", Global.System.Data.DataRowVersion.Original, false, Nothing))
18386             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ServiceTax", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ServiceTax", Global.System.Data.DataRowVersion.Original, true, Nothing))
18387             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ServiceTax", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ServiceTax", Global.System.Data.DataRowVersion.Original, false, Nothing))
18388             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ServiceCharges", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ServiceCharges", Global.System.Data.DataRowVersion.Original, true, Nothing))
18389             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ServiceCharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "ServiceCharges", Global.System.Data.DataRowVersion.Original, false, Nothing))
18390             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TACharges", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TACharges", Global.System.Data.DataRowVersion.Original, true, Nothing))
18391             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TACharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TACharges", Global.System.Data.DataRowVersion.Original, false, Nothing))
18392             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_HDCharges", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "HDCharges", Global.System.Data.DataRowVersion.Original, true, Nothing))
18393             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_HDCharges", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "HDCharges", Global.System.Data.DataRowVersion.Original, false, Nothing))
18394             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_GrandTotal", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Original, true, Nothing))
18395             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_GrandTotal", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "GrandTotal", Global.System.Data.DataRowVersion.Original, false, Nothing))
18396             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Cash", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Cash", Global.System.Data.DataRowVersion.Original, true, Nothing))
18397             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Cash", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Cash", Global.System.Data.DataRowVersion.Original, false, Nothing))
18398             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Change", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Change", Global.System.Data.DataRowVersion.Original, true, Nothing))
18399             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Change", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Change", Global.System.Data.DataRowVersion.Original, false, Nothing))
18400             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_OperatorID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Original, true, Nothing))
18401             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_OperatorID", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "OperatorID", Global.System.Data.DataRowVersion.Original, false, Nothing))
18402             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_BillNote", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Original, true, Nothing))
18403             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_BillNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "BillNote", Global.System.Data.DataRowVersion.Original, false, Nothing))
18404         End Sub
18405         
18406         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18407          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
18408         Private Sub InitConnection()
18409             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
18410             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
18411         End Sub
18412         
18413         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18414          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
18415         Private Sub InitCommandCollection()
18416             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
18417             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
18418             Me._commandCollection(0).Connection = Me.Connection
18419             Me._commandCollection(0).CommandText = "SELECT BillId, BillType, BillDate, CustomerName, AddressLine1, AddressLine2, Addr"& _
18420                 "essLine3, ContactNo, PaymentMode, SubTotal, ItemDiscount, DiscountPer, Discount,"& _
18421                 " VAT, ServiceTax, ServiceCharges, TACharges, HDCharges, GrandTotal, Cash, Change"& _
18422                 ", OperatorID, BillNote FROM RestaurantBillingInfo"
18423             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
18424         End Sub
18425         
18426         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18427          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
18428          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
18429          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
18430         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.RestaurantBillingInfoDataTable) As Integer
18431             Me.Adapter.SelectCommand = Me.CommandCollection(0)
18432             If (Me.ClearBeforeFill = true) Then
18433                 dataTable.Clear
18434             End If
18435             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
18436             Return returnValue
18437         End Function
18438         
18439         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18440          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
18441          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
18442          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
18443         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.RestaurantBillingInfoDataTable
18444             Me.Adapter.SelectCommand = Me.CommandCollection(0)
18445             Dim dataTable As RPOS_DBDataSet.RestaurantBillingInfoDataTable = New RPOS_DBDataSet.RestaurantBillingInfoDataTable()
18446             Me.Adapter.Fill(dataTable)
18447             Return dataTable
18448         End Function
18449         
18450         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18451          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
18452          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
18453         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.RestaurantBillingInfoDataTable) As Integer
18454             Return Me.Adapter.Update(dataTable)
18455         End Function
18456         
18457         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18458          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
18459          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
18460         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
18461             Return Me.Adapter.Update(dataSet, "RestaurantBillingInfo")
18462         End Function
18463         
18464         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18465          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
18466          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
18467         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
18468             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
18469         End Function
18470         
18471         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18472          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
18473          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
18474         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
18475             Return Me.Adapter.Update(dataRows)
18476         End Function
18477         
18478         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18479          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
18480          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
18481          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
18482         Public Overloads Overridable Function Delete( _
18483                     ByVal Original_BillId As Global.System.Nullable(Of Integer), _
18484                     ByVal Original_BillType As String, _
18485                     ByVal Original_BillDate As Global.System.Nullable(Of Date), _
18486                     ByVal Original_CustomerName As String, _
18487                     ByVal Original_AddressLine1 As String, _
18488                     ByVal Original_AddressLine2 As String, _
18489                     ByVal Original_AddressLine3 As String, _
18490                     ByVal Original_ContactNo As String, _
18491                     ByVal Original_PaymentMode As String, _
18492                     ByVal Original_SubTotal As Global.System.Nullable(Of Decimal), _
18493                     ByVal Original_ItemDiscount As Global.System.Nullable(Of Decimal), _
18494                     ByVal Original_DiscountPer As Global.System.Nullable(Of Decimal), _
18495                     ByVal Original_Discount As Global.System.Nullable(Of Decimal), _
18496                     ByVal Original_VAT As Global.System.Nullable(Of Decimal), _
18497                     ByVal Original_ServiceTax As Global.System.Nullable(Of Decimal), _
18498                     ByVal Original_ServiceCharges As Global.System.Nullable(Of Decimal), _
18499                     ByVal Original_TACharges As Global.System.Nullable(Of Decimal), _
18500                     ByVal Original_HDCharges As Global.System.Nullable(Of Decimal), _
18501                     ByVal Original_GrandTotal As Global.System.Nullable(Of Decimal), _
18502                     ByVal Original_Cash As Global.System.Nullable(Of Decimal), _
18503                     ByVal Original_Change As Global.System.Nullable(Of Decimal), _
18504                     ByVal Original_OperatorID As String, _
18505                     ByVal Original_BillNote As String) As Integer
18506             If (Original_BillId.HasValue = true) Then
18507                 Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_BillId.Value,Integer)
18508             Else
18509                 Me.Adapter.DeleteCommand.Parameters(0).Value = Global.System.DBNull.Value
18510             End If
18511             If (Original_BillType Is Nothing) Then
18512                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
18513                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
18514             Else
18515                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
18516                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_BillType,String)
18517             End If
18518             If (Original_BillDate.HasValue = true) Then
18519                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
18520                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_BillDate.Value,Date)
18521             Else
18522                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
18523                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
18524             End If
18525             If (Original_CustomerName Is Nothing) Then
18526                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
18527                 Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
18528             Else
18529                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
18530                 Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_CustomerName,String)
18531             End If
18532             If (Original_AddressLine1 Is Nothing) Then
18533                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(1,Object)
18534                 Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
18535             Else
18536                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(0,Object)
18537                 Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_AddressLine1,String)
18538             End If
18539             If (Original_AddressLine2 Is Nothing) Then
18540                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(1,Object)
18541                 Me.Adapter.DeleteCommand.Parameters(10).Value = Global.System.DBNull.Value
18542             Else
18543                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(0,Object)
18544                 Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_AddressLine2,String)
18545             End If
18546             If (Original_AddressLine3 Is Nothing) Then
18547                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(1,Object)
18548                 Me.Adapter.DeleteCommand.Parameters(12).Value = Global.System.DBNull.Value
18549             Else
18550                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(0,Object)
18551                 Me.Adapter.DeleteCommand.Parameters(12).Value = CType(Original_AddressLine3,String)
18552             End If
18553             If (Original_ContactNo Is Nothing) Then
18554                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(1,Object)
18555                 Me.Adapter.DeleteCommand.Parameters(14).Value = Global.System.DBNull.Value
18556             Else
18557                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(0,Object)
18558                 Me.Adapter.DeleteCommand.Parameters(14).Value = CType(Original_ContactNo,String)
18559             End If
18560             If (Original_PaymentMode Is Nothing) Then
18561                 Me.Adapter.DeleteCommand.Parameters(15).Value = CType(1,Object)
18562                 Me.Adapter.DeleteCommand.Parameters(16).Value = Global.System.DBNull.Value
18563             Else
18564                 Me.Adapter.DeleteCommand.Parameters(15).Value = CType(0,Object)
18565                 Me.Adapter.DeleteCommand.Parameters(16).Value = CType(Original_PaymentMode,String)
18566             End If
18567             If (Original_SubTotal.HasValue = true) Then
18568                 Me.Adapter.DeleteCommand.Parameters(17).Value = CType(0,Object)
18569                 Me.Adapter.DeleteCommand.Parameters(18).Value = CType(Original_SubTotal.Value,Decimal)
18570             Else
18571                 Me.Adapter.DeleteCommand.Parameters(17).Value = CType(1,Object)
18572                 Me.Adapter.DeleteCommand.Parameters(18).Value = Global.System.DBNull.Value
18573             End If
18574             If (Original_ItemDiscount.HasValue = true) Then
18575                 Me.Adapter.DeleteCommand.Parameters(19).Value = CType(0,Object)
18576                 Me.Adapter.DeleteCommand.Parameters(20).Value = CType(Original_ItemDiscount.Value,Decimal)
18577             Else
18578                 Me.Adapter.DeleteCommand.Parameters(19).Value = CType(1,Object)
18579                 Me.Adapter.DeleteCommand.Parameters(20).Value = Global.System.DBNull.Value
18580             End If
18581             If (Original_DiscountPer.HasValue = true) Then
18582                 Me.Adapter.DeleteCommand.Parameters(21).Value = CType(0,Object)
18583                 Me.Adapter.DeleteCommand.Parameters(22).Value = CType(Original_DiscountPer.Value,Decimal)
18584             Else
18585                 Me.Adapter.DeleteCommand.Parameters(21).Value = CType(1,Object)
18586                 Me.Adapter.DeleteCommand.Parameters(22).Value = Global.System.DBNull.Value
18587             End If
18588             If (Original_Discount.HasValue = true) Then
18589                 Me.Adapter.DeleteCommand.Parameters(23).Value = CType(0,Object)
18590                 Me.Adapter.DeleteCommand.Parameters(24).Value = CType(Original_Discount.Value,Decimal)
18591             Else
18592                 Me.Adapter.DeleteCommand.Parameters(23).Value = CType(1,Object)
18593                 Me.Adapter.DeleteCommand.Parameters(24).Value = Global.System.DBNull.Value
18594             End If
18595             If (Original_VAT.HasValue = true) Then
18596                 Me.Adapter.DeleteCommand.Parameters(25).Value = CType(0,Object)
18597                 Me.Adapter.DeleteCommand.Parameters(26).Value = CType(Original_VAT.Value,Decimal)
18598             Else
18599                 Me.Adapter.DeleteCommand.Parameters(25).Value = CType(1,Object)
18600                 Me.Adapter.DeleteCommand.Parameters(26).Value = Global.System.DBNull.Value
18601             End If
18602             If (Original_ServiceTax.HasValue = true) Then
18603                 Me.Adapter.DeleteCommand.Parameters(27).Value = CType(0,Object)
18604                 Me.Adapter.DeleteCommand.Parameters(28).Value = CType(Original_ServiceTax.Value,Decimal)
18605             Else
18606                 Me.Adapter.DeleteCommand.Parameters(27).Value = CType(1,Object)
18607                 Me.Adapter.DeleteCommand.Parameters(28).Value = Global.System.DBNull.Value
18608             End If
18609             If (Original_ServiceCharges.HasValue = true) Then
18610                 Me.Adapter.DeleteCommand.Parameters(29).Value = CType(0,Object)
18611                 Me.Adapter.DeleteCommand.Parameters(30).Value = CType(Original_ServiceCharges.Value,Decimal)
18612             Else
18613                 Me.Adapter.DeleteCommand.Parameters(29).Value = CType(1,Object)
18614                 Me.Adapter.DeleteCommand.Parameters(30).Value = Global.System.DBNull.Value
18615             End If
18616             If (Original_TACharges.HasValue = true) Then
18617                 Me.Adapter.DeleteCommand.Parameters(31).Value = CType(0,Object)
18618                 Me.Adapter.DeleteCommand.Parameters(32).Value = CType(Original_TACharges.Value,Decimal)
18619             Else
18620                 Me.Adapter.DeleteCommand.Parameters(31).Value = CType(1,Object)
18621                 Me.Adapter.DeleteCommand.Parameters(32).Value = Global.System.DBNull.Value
18622             End If
18623             If (Original_HDCharges.HasValue = true) Then
18624                 Me.Adapter.DeleteCommand.Parameters(33).Value = CType(0,Object)
18625                 Me.Adapter.DeleteCommand.Parameters(34).Value = CType(Original_HDCharges.Value,Decimal)
18626             Else
18627                 Me.Adapter.DeleteCommand.Parameters(33).Value = CType(1,Object)
18628                 Me.Adapter.DeleteCommand.Parameters(34).Value = Global.System.DBNull.Value
18629             End If
18630             If (Original_GrandTotal.HasValue = true) Then
18631                 Me.Adapter.DeleteCommand.Parameters(35).Value = CType(0,Object)
18632                 Me.Adapter.DeleteCommand.Parameters(36).Value = CType(Original_GrandTotal.Value,Decimal)
18633             Else
18634                 Me.Adapter.DeleteCommand.Parameters(35).Value = CType(1,Object)
18635                 Me.Adapter.DeleteCommand.Parameters(36).Value = Global.System.DBNull.Value
18636             End If
18637             If (Original_Cash.HasValue = true) Then
18638                 Me.Adapter.DeleteCommand.Parameters(37).Value = CType(0,Object)
18639                 Me.Adapter.DeleteCommand.Parameters(38).Value = CType(Original_Cash.Value,Decimal)
18640             Else
18641                 Me.Adapter.DeleteCommand.Parameters(37).Value = CType(1,Object)
18642                 Me.Adapter.DeleteCommand.Parameters(38).Value = Global.System.DBNull.Value
18643             End If
18644             If (Original_Change.HasValue = true) Then
18645                 Me.Adapter.DeleteCommand.Parameters(39).Value = CType(0,Object)
18646                 Me.Adapter.DeleteCommand.Parameters(40).Value = CType(Original_Change.Value,Decimal)
18647             Else
18648                 Me.Adapter.DeleteCommand.Parameters(39).Value = CType(1,Object)
18649                 Me.Adapter.DeleteCommand.Parameters(40).Value = Global.System.DBNull.Value
18650             End If
18651             If (Original_OperatorID Is Nothing) Then
18652                 Me.Adapter.DeleteCommand.Parameters(41).Value = CType(1,Object)
18653                 Me.Adapter.DeleteCommand.Parameters(42).Value = Global.System.DBNull.Value
18654             Else
18655                 Me.Adapter.DeleteCommand.Parameters(41).Value = CType(0,Object)
18656                 Me.Adapter.DeleteCommand.Parameters(42).Value = CType(Original_OperatorID,String)
18657             End If
18658             If (Original_BillNote Is Nothing) Then
18659                 Me.Adapter.DeleteCommand.Parameters(43).Value = CType(1,Object)
18660                 Me.Adapter.DeleteCommand.Parameters(44).Value = Global.System.DBNull.Value
18661             Else
18662                 Me.Adapter.DeleteCommand.Parameters(43).Value = CType(0,Object)
18663                 Me.Adapter.DeleteCommand.Parameters(44).Value = CType(Original_BillNote,String)
18664             End If
18665             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
18666             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
18667                         <> Global.System.Data.ConnectionState.Open) Then
18668                 Me.Adapter.DeleteCommand.Connection.Open
18669             End If
18670             Try
18671                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
18672                 Return returnValue
18673             Finally
18674                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
18675                     Me.Adapter.DeleteCommand.Connection.Close
18676                 End If
18677             End Try
18678         End Function
18679         
18680         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18681          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
18682          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
18683          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
18684         Public Overloads Overridable Function Insert( _
18685                     ByVal BillId As Global.System.Nullable(Of Integer), _
18686                     ByVal BillType As String, _
18687                     ByVal BillDate As Global.System.Nullable(Of Date), _
18688                     ByVal CustomerName As String, _
18689                     ByVal AddressLine1 As String, _
18690                     ByVal AddressLine2 As String, _
18691                     ByVal AddressLine3 As String, _
18692                     ByVal ContactNo As String, _
18693                     ByVal PaymentMode As String, _
18694                     ByVal SubTotal As Global.System.Nullable(Of Decimal), _
18695                     ByVal ItemDiscount As Global.System.Nullable(Of Decimal), _
18696                     ByVal DiscountPer As Global.System.Nullable(Of Decimal), _
18697                     ByVal Discount As Global.System.Nullable(Of Decimal), _
18698                     ByVal VAT As Global.System.Nullable(Of Decimal), _
18699                     ByVal ServiceTax As Global.System.Nullable(Of Decimal), _
18700                     ByVal ServiceCharges As Global.System.Nullable(Of Decimal), _
18701                     ByVal TACharges As Global.System.Nullable(Of Decimal), _
18702                     ByVal HDCharges As Global.System.Nullable(Of Decimal), _
18703                     ByVal GrandTotal As Global.System.Nullable(Of Decimal), _
18704                     ByVal Cash As Global.System.Nullable(Of Decimal), _
18705                     ByVal Change As Global.System.Nullable(Of Decimal), _
18706                     ByVal OperatorID As String, _
18707                     ByVal BillNote As String) As Integer
18708             If (BillId.HasValue = true) Then
18709                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(BillId.Value,Integer)
18710             Else
18711                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
18712             End If
18713             If (BillType Is Nothing) Then
18714                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
18715             Else
18716                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(BillType,String)
18717             End If
18718             If (BillDate.HasValue = true) Then
18719                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(BillDate.Value,Date)
18720             Else
18721                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
18722             End If
18723             If (CustomerName Is Nothing) Then
18724                 Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
18725             Else
18726                 Me.Adapter.InsertCommand.Parameters(3).Value = CType(CustomerName,String)
18727             End If
18728             If (AddressLine1 Is Nothing) Then
18729                 Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
18730             Else
18731                 Me.Adapter.InsertCommand.Parameters(4).Value = CType(AddressLine1,String)
18732             End If
18733             If (AddressLine2 Is Nothing) Then
18734                 Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
18735             Else
18736                 Me.Adapter.InsertCommand.Parameters(5).Value = CType(AddressLine2,String)
18737             End If
18738             If (AddressLine3 Is Nothing) Then
18739                 Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
18740             Else
18741                 Me.Adapter.InsertCommand.Parameters(6).Value = CType(AddressLine3,String)
18742             End If
18743             If (ContactNo Is Nothing) Then
18744                 Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
18745             Else
18746                 Me.Adapter.InsertCommand.Parameters(7).Value = CType(ContactNo,String)
18747             End If
18748             If (PaymentMode Is Nothing) Then
18749                 Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
18750             Else
18751                 Me.Adapter.InsertCommand.Parameters(8).Value = CType(PaymentMode,String)
18752             End If
18753             If (SubTotal.HasValue = true) Then
18754                 Me.Adapter.InsertCommand.Parameters(9).Value = CType(SubTotal.Value,Decimal)
18755             Else
18756                 Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
18757             End If
18758             If (ItemDiscount.HasValue = true) Then
18759                 Me.Adapter.InsertCommand.Parameters(10).Value = CType(ItemDiscount.Value,Decimal)
18760             Else
18761                 Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
18762             End If
18763             If (DiscountPer.HasValue = true) Then
18764                 Me.Adapter.InsertCommand.Parameters(11).Value = CType(DiscountPer.Value,Decimal)
18765             Else
18766                 Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
18767             End If
18768             If (Discount.HasValue = true) Then
18769                 Me.Adapter.InsertCommand.Parameters(12).Value = CType(Discount.Value,Decimal)
18770             Else
18771                 Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
18772             End If
18773             If (VAT.HasValue = true) Then
18774                 Me.Adapter.InsertCommand.Parameters(13).Value = CType(VAT.Value,Decimal)
18775             Else
18776                 Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
18777             End If
18778             If (ServiceTax.HasValue = true) Then
18779                 Me.Adapter.InsertCommand.Parameters(14).Value = CType(ServiceTax.Value,Decimal)
18780             Else
18781                 Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
18782             End If
18783             If (ServiceCharges.HasValue = true) Then
18784                 Me.Adapter.InsertCommand.Parameters(15).Value = CType(ServiceCharges.Value,Decimal)
18785             Else
18786                 Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
18787             End If
18788             If (TACharges.HasValue = true) Then
18789                 Me.Adapter.InsertCommand.Parameters(16).Value = CType(TACharges.Value,Decimal)
18790             Else
18791                 Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
18792             End If
18793             If (HDCharges.HasValue = true) Then
18794                 Me.Adapter.InsertCommand.Parameters(17).Value = CType(HDCharges.Value,Decimal)
18795             Else
18796                 Me.Adapter.InsertCommand.Parameters(17).Value = Global.System.DBNull.Value
18797             End If
18798             If (GrandTotal.HasValue = true) Then
18799                 Me.Adapter.InsertCommand.Parameters(18).Value = CType(GrandTotal.Value,Decimal)
18800             Else
18801                 Me.Adapter.InsertCommand.Parameters(18).Value = Global.System.DBNull.Value
18802             End If
18803             If (Cash.HasValue = true) Then
18804                 Me.Adapter.InsertCommand.Parameters(19).Value = CType(Cash.Value,Decimal)
18805             Else
18806                 Me.Adapter.InsertCommand.Parameters(19).Value = Global.System.DBNull.Value
18807             End If
18808             If (Change.HasValue = true) Then
18809                 Me.Adapter.InsertCommand.Parameters(20).Value = CType(Change.Value,Decimal)
18810             Else
18811                 Me.Adapter.InsertCommand.Parameters(20).Value = Global.System.DBNull.Value
18812             End If
18813             If (OperatorID Is Nothing) Then
18814                 Me.Adapter.InsertCommand.Parameters(21).Value = Global.System.DBNull.Value
18815             Else
18816                 Me.Adapter.InsertCommand.Parameters(21).Value = CType(OperatorID,String)
18817             End If
18818             If (BillNote Is Nothing) Then
18819                 Me.Adapter.InsertCommand.Parameters(22).Value = Global.System.DBNull.Value
18820             Else
18821                 Me.Adapter.InsertCommand.Parameters(22).Value = CType(BillNote,String)
18822             End If
18823             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
18824             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
18825                         <> Global.System.Data.ConnectionState.Open) Then
18826                 Me.Adapter.InsertCommand.Connection.Open
18827             End If
18828             Try
18829                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
18830                 Return returnValue
18831             Finally
18832                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
18833                     Me.Adapter.InsertCommand.Connection.Close
18834                 End If
18835             End Try
18836         End Function
18837         
18838         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
18839          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
18840          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
18841          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
18842         Public Overloads Overridable Function Update( _
18843                     ByVal BillId As Global.System.Nullable(Of Integer), _
18844                     ByVal BillType As String, _
18845                     ByVal BillDate As Global.System.Nullable(Of Date), _
18846                     ByVal CustomerName As String, _
18847                     ByVal AddressLine1 As String, _
18848                     ByVal AddressLine2 As String, _
18849                     ByVal AddressLine3 As String, _
18850                     ByVal ContactNo As String, _
18851                     ByVal PaymentMode As String, _
18852                     ByVal SubTotal As Global.System.Nullable(Of Decimal), _
18853                     ByVal ItemDiscount As Global.System.Nullable(Of Decimal), _
18854                     ByVal DiscountPer As Global.System.Nullable(Of Decimal), _
18855                     ByVal Discount As Global.System.Nullable(Of Decimal), _
18856                     ByVal VAT As Global.System.Nullable(Of Decimal), _
18857                     ByVal ServiceTax As Global.System.Nullable(Of Decimal), _
18858                     ByVal ServiceCharges As Global.System.Nullable(Of Decimal), _
18859                     ByVal TACharges As Global.System.Nullable(Of Decimal), _
18860                     ByVal HDCharges As Global.System.Nullable(Of Decimal), _
18861                     ByVal GrandTotal As Global.System.Nullable(Of Decimal), _
18862                     ByVal Cash As Global.System.Nullable(Of Decimal), _
18863                     ByVal Change As Global.System.Nullable(Of Decimal), _
18864                     ByVal OperatorID As String, _
18865                     ByVal BillNote As String, _
18866                     ByVal Original_BillId As Global.System.Nullable(Of Integer), _
18867                     ByVal Original_BillType As String, _
18868                     ByVal Original_BillDate As Global.System.Nullable(Of Date), _
18869                     ByVal Original_CustomerName As String, _
18870                     ByVal Original_AddressLine1 As String, _
18871                     ByVal Original_AddressLine2 As String, _
18872                     ByVal Original_AddressLine3 As String, _
18873                     ByVal Original_ContactNo As String, _
18874                     ByVal Original_PaymentMode As String, _
18875                     ByVal Original_SubTotal As Global.System.Nullable(Of Decimal), _
18876                     ByVal Original_ItemDiscount As Global.System.Nullable(Of Decimal), _
18877                     ByVal Original_DiscountPer As Global.System.Nullable(Of Decimal), _
18878                     ByVal Original_Discount As Global.System.Nullable(Of Decimal), _
18879                     ByVal Original_VAT As Global.System.Nullable(Of Decimal), _
18880                     ByVal Original_ServiceTax As Global.System.Nullable(Of Decimal), _
18881                     ByVal Original_ServiceCharges As Global.System.Nullable(Of Decimal), _
18882                     ByVal Original_TACharges As Global.System.Nullable(Of Decimal), _
18883                     ByVal Original_HDCharges As Global.System.Nullable(Of Decimal), _
18884                     ByVal Original_GrandTotal As Global.System.Nullable(Of Decimal), _
18885                     ByVal Original_Cash As Global.System.Nullable(Of Decimal), _
18886                     ByVal Original_Change As Global.System.Nullable(Of Decimal), _
18887                     ByVal Original_OperatorID As String, _
18888                     ByVal Original_BillNote As String) As Integer
18889             If (BillId.HasValue = true) Then
18890                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(BillId.Value,Integer)
18891             Else
18892                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
18893             End If
18894             If (BillType Is Nothing) Then
18895                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
18896             Else
18897                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(BillType,String)
18898             End If
18899             If (BillDate.HasValue = true) Then
18900                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(BillDate.Value,Date)
18901             Else
18902                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
18903             End If
18904             If (CustomerName Is Nothing) Then
18905                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
18906             Else
18907                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(CustomerName,String)
18908             End If
18909             If (AddressLine1 Is Nothing) Then
18910                 Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
18911             Else
18912                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(AddressLine1,String)
18913             End If
18914             If (AddressLine2 Is Nothing) Then
18915                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
18916             Else
18917                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(AddressLine2,String)
18918             End If
18919             If (AddressLine3 Is Nothing) Then
18920                 Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
18921             Else
18922                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(AddressLine3,String)
18923             End If
18924             If (ContactNo Is Nothing) Then
18925                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
18926             Else
18927                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(ContactNo,String)
18928             End If
18929             If (PaymentMode Is Nothing) Then
18930                 Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
18931             Else
18932                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(PaymentMode,String)
18933             End If
18934             If (SubTotal.HasValue = true) Then
18935                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(SubTotal.Value,Decimal)
18936             Else
18937                 Me.Adapter.UpdateCommand.Parameters(9).Value = Global.System.DBNull.Value
18938             End If
18939             If (ItemDiscount.HasValue = true) Then
18940                 Me.Adapter.UpdateCommand.Parameters(10).Value = CType(ItemDiscount.Value,Decimal)
18941             Else
18942                 Me.Adapter.UpdateCommand.Parameters(10).Value = Global.System.DBNull.Value
18943             End If
18944             If (DiscountPer.HasValue = true) Then
18945                 Me.Adapter.UpdateCommand.Parameters(11).Value = CType(DiscountPer.Value,Decimal)
18946             Else
18947                 Me.Adapter.UpdateCommand.Parameters(11).Value = Global.System.DBNull.Value
18948             End If
18949             If (Discount.HasValue = true) Then
18950                 Me.Adapter.UpdateCommand.Parameters(12).Value = CType(Discount.Value,Decimal)
18951             Else
18952                 Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
18953             End If
18954             If (VAT.HasValue = true) Then
18955                 Me.Adapter.UpdateCommand.Parameters(13).Value = CType(VAT.Value,Decimal)
18956             Else
18957                 Me.Adapter.UpdateCommand.Parameters(13).Value = Global.System.DBNull.Value
18958             End If
18959             If (ServiceTax.HasValue = true) Then
18960                 Me.Adapter.UpdateCommand.Parameters(14).Value = CType(ServiceTax.Value,Decimal)
18961             Else
18962                 Me.Adapter.UpdateCommand.Parameters(14).Value = Global.System.DBNull.Value
18963             End If
18964             If (ServiceCharges.HasValue = true) Then
18965                 Me.Adapter.UpdateCommand.Parameters(15).Value = CType(ServiceCharges.Value,Decimal)
18966             Else
18967                 Me.Adapter.UpdateCommand.Parameters(15).Value = Global.System.DBNull.Value
18968             End If
18969             If (TACharges.HasValue = true) Then
18970                 Me.Adapter.UpdateCommand.Parameters(16).Value = CType(TACharges.Value,Decimal)
18971             Else
18972                 Me.Adapter.UpdateCommand.Parameters(16).Value = Global.System.DBNull.Value
18973             End If
18974             If (HDCharges.HasValue = true) Then
18975                 Me.Adapter.UpdateCommand.Parameters(17).Value = CType(HDCharges.Value,Decimal)
18976             Else
18977                 Me.Adapter.UpdateCommand.Parameters(17).Value = Global.System.DBNull.Value
18978             End If
18979             If (GrandTotal.HasValue = true) Then
18980                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(GrandTotal.Value,Decimal)
18981             Else
18982                 Me.Adapter.UpdateCommand.Parameters(18).Value = Global.System.DBNull.Value
18983             End If
18984             If (Cash.HasValue = true) Then
18985                 Me.Adapter.UpdateCommand.Parameters(19).Value = CType(Cash.Value,Decimal)
18986             Else
18987                 Me.Adapter.UpdateCommand.Parameters(19).Value = Global.System.DBNull.Value
18988             End If
18989             If (Change.HasValue = true) Then
18990                 Me.Adapter.UpdateCommand.Parameters(20).Value = CType(Change.Value,Decimal)
18991             Else
18992                 Me.Adapter.UpdateCommand.Parameters(20).Value = Global.System.DBNull.Value
18993             End If
18994             If (OperatorID Is Nothing) Then
18995                 Me.Adapter.UpdateCommand.Parameters(21).Value = Global.System.DBNull.Value
18996             Else
18997                 Me.Adapter.UpdateCommand.Parameters(21).Value = CType(OperatorID,String)
18998             End If
18999             If (BillNote Is Nothing) Then
19000                 Me.Adapter.UpdateCommand.Parameters(22).Value = Global.System.DBNull.Value
19001             Else
19002                 Me.Adapter.UpdateCommand.Parameters(22).Value = CType(BillNote,String)
19003             End If
19004             If (Original_BillId.HasValue = true) Then
19005                 Me.Adapter.UpdateCommand.Parameters(23).Value = CType(Original_BillId.Value,Integer)
19006             Else
19007                 Me.Adapter.UpdateCommand.Parameters(23).Value = Global.System.DBNull.Value
19008             End If
19009             If (Original_BillType Is Nothing) Then
19010                 Me.Adapter.UpdateCommand.Parameters(24).Value = CType(1,Object)
19011                 Me.Adapter.UpdateCommand.Parameters(25).Value = Global.System.DBNull.Value
19012             Else
19013                 Me.Adapter.UpdateCommand.Parameters(24).Value = CType(0,Object)
19014                 Me.Adapter.UpdateCommand.Parameters(25).Value = CType(Original_BillType,String)
19015             End If
19016             If (Original_BillDate.HasValue = true) Then
19017                 Me.Adapter.UpdateCommand.Parameters(26).Value = CType(0,Object)
19018                 Me.Adapter.UpdateCommand.Parameters(27).Value = CType(Original_BillDate.Value,Date)
19019             Else
19020                 Me.Adapter.UpdateCommand.Parameters(26).Value = CType(1,Object)
19021                 Me.Adapter.UpdateCommand.Parameters(27).Value = Global.System.DBNull.Value
19022             End If
19023             If (Original_CustomerName Is Nothing) Then
19024                 Me.Adapter.UpdateCommand.Parameters(28).Value = CType(1,Object)
19025                 Me.Adapter.UpdateCommand.Parameters(29).Value = Global.System.DBNull.Value
19026             Else
19027                 Me.Adapter.UpdateCommand.Parameters(28).Value = CType(0,Object)
19028                 Me.Adapter.UpdateCommand.Parameters(29).Value = CType(Original_CustomerName,String)
19029             End If
19030             If (Original_AddressLine1 Is Nothing) Then
19031                 Me.Adapter.UpdateCommand.Parameters(30).Value = CType(1,Object)
19032                 Me.Adapter.UpdateCommand.Parameters(31).Value = Global.System.DBNull.Value
19033             Else
19034                 Me.Adapter.UpdateCommand.Parameters(30).Value = CType(0,Object)
19035                 Me.Adapter.UpdateCommand.Parameters(31).Value = CType(Original_AddressLine1,String)
19036             End If
19037             If (Original_AddressLine2 Is Nothing) Then
19038                 Me.Adapter.UpdateCommand.Parameters(32).Value = CType(1,Object)
19039                 Me.Adapter.UpdateCommand.Parameters(33).Value = Global.System.DBNull.Value
19040             Else
19041                 Me.Adapter.UpdateCommand.Parameters(32).Value = CType(0,Object)
19042                 Me.Adapter.UpdateCommand.Parameters(33).Value = CType(Original_AddressLine2,String)
19043             End If
19044             If (Original_AddressLine3 Is Nothing) Then
19045                 Me.Adapter.UpdateCommand.Parameters(34).Value = CType(1,Object)
19046                 Me.Adapter.UpdateCommand.Parameters(35).Value = Global.System.DBNull.Value
19047             Else
19048                 Me.Adapter.UpdateCommand.Parameters(34).Value = CType(0,Object)
19049                 Me.Adapter.UpdateCommand.Parameters(35).Value = CType(Original_AddressLine3,String)
19050             End If
19051             If (Original_ContactNo Is Nothing) Then
19052                 Me.Adapter.UpdateCommand.Parameters(36).Value = CType(1,Object)
19053                 Me.Adapter.UpdateCommand.Parameters(37).Value = Global.System.DBNull.Value
19054             Else
19055                 Me.Adapter.UpdateCommand.Parameters(36).Value = CType(0,Object)
19056                 Me.Adapter.UpdateCommand.Parameters(37).Value = CType(Original_ContactNo,String)
19057             End If
19058             If (Original_PaymentMode Is Nothing) Then
19059                 Me.Adapter.UpdateCommand.Parameters(38).Value = CType(1,Object)
19060                 Me.Adapter.UpdateCommand.Parameters(39).Value = Global.System.DBNull.Value
19061             Else
19062                 Me.Adapter.UpdateCommand.Parameters(38).Value = CType(0,Object)
19063                 Me.Adapter.UpdateCommand.Parameters(39).Value = CType(Original_PaymentMode,String)
19064             End If
19065             If (Original_SubTotal.HasValue = true) Then
19066                 Me.Adapter.UpdateCommand.Parameters(40).Value = CType(0,Object)
19067                 Me.Adapter.UpdateCommand.Parameters(41).Value = CType(Original_SubTotal.Value,Decimal)
19068             Else
19069                 Me.Adapter.UpdateCommand.Parameters(40).Value = CType(1,Object)
19070                 Me.Adapter.UpdateCommand.Parameters(41).Value = Global.System.DBNull.Value
19071             End If
19072             If (Original_ItemDiscount.HasValue = true) Then
19073                 Me.Adapter.UpdateCommand.Parameters(42).Value = CType(0,Object)
19074                 Me.Adapter.UpdateCommand.Parameters(43).Value = CType(Original_ItemDiscount.Value,Decimal)
19075             Else
19076                 Me.Adapter.UpdateCommand.Parameters(42).Value = CType(1,Object)
19077                 Me.Adapter.UpdateCommand.Parameters(43).Value = Global.System.DBNull.Value
19078             End If
19079             If (Original_DiscountPer.HasValue = true) Then
19080                 Me.Adapter.UpdateCommand.Parameters(44).Value = CType(0,Object)
19081                 Me.Adapter.UpdateCommand.Parameters(45).Value = CType(Original_DiscountPer.Value,Decimal)
19082             Else
19083                 Me.Adapter.UpdateCommand.Parameters(44).Value = CType(1,Object)
19084                 Me.Adapter.UpdateCommand.Parameters(45).Value = Global.System.DBNull.Value
19085             End If
19086             If (Original_Discount.HasValue = true) Then
19087                 Me.Adapter.UpdateCommand.Parameters(46).Value = CType(0,Object)
19088                 Me.Adapter.UpdateCommand.Parameters(47).Value = CType(Original_Discount.Value,Decimal)
19089             Else
19090                 Me.Adapter.UpdateCommand.Parameters(46).Value = CType(1,Object)
19091                 Me.Adapter.UpdateCommand.Parameters(47).Value = Global.System.DBNull.Value
19092             End If
19093             If (Original_VAT.HasValue = true) Then
19094                 Me.Adapter.UpdateCommand.Parameters(48).Value = CType(0,Object)
19095                 Me.Adapter.UpdateCommand.Parameters(49).Value = CType(Original_VAT.Value,Decimal)
19096             Else
19097                 Me.Adapter.UpdateCommand.Parameters(48).Value = CType(1,Object)
19098                 Me.Adapter.UpdateCommand.Parameters(49).Value = Global.System.DBNull.Value
19099             End If
19100             If (Original_ServiceTax.HasValue = true) Then
19101                 Me.Adapter.UpdateCommand.Parameters(50).Value = CType(0,Object)
19102                 Me.Adapter.UpdateCommand.Parameters(51).Value = CType(Original_ServiceTax.Value,Decimal)
19103             Else
19104                 Me.Adapter.UpdateCommand.Parameters(50).Value = CType(1,Object)
19105                 Me.Adapter.UpdateCommand.Parameters(51).Value = Global.System.DBNull.Value
19106             End If
19107             If (Original_ServiceCharges.HasValue = true) Then
19108                 Me.Adapter.UpdateCommand.Parameters(52).Value = CType(0,Object)
19109                 Me.Adapter.UpdateCommand.Parameters(53).Value = CType(Original_ServiceCharges.Value,Decimal)
19110             Else
19111                 Me.Adapter.UpdateCommand.Parameters(52).Value = CType(1,Object)
19112                 Me.Adapter.UpdateCommand.Parameters(53).Value = Global.System.DBNull.Value
19113             End If
19114             If (Original_TACharges.HasValue = true) Then
19115                 Me.Adapter.UpdateCommand.Parameters(54).Value = CType(0,Object)
19116                 Me.Adapter.UpdateCommand.Parameters(55).Value = CType(Original_TACharges.Value,Decimal)
19117             Else
19118                 Me.Adapter.UpdateCommand.Parameters(54).Value = CType(1,Object)
19119                 Me.Adapter.UpdateCommand.Parameters(55).Value = Global.System.DBNull.Value
19120             End If
19121             If (Original_HDCharges.HasValue = true) Then
19122                 Me.Adapter.UpdateCommand.Parameters(56).Value = CType(0,Object)
19123                 Me.Adapter.UpdateCommand.Parameters(57).Value = CType(Original_HDCharges.Value,Decimal)
19124             Else
19125                 Me.Adapter.UpdateCommand.Parameters(56).Value = CType(1,Object)
19126                 Me.Adapter.UpdateCommand.Parameters(57).Value = Global.System.DBNull.Value
19127             End If
19128             If (Original_GrandTotal.HasValue = true) Then
19129                 Me.Adapter.UpdateCommand.Parameters(58).Value = CType(0,Object)
19130                 Me.Adapter.UpdateCommand.Parameters(59).Value = CType(Original_GrandTotal.Value,Decimal)
19131             Else
19132                 Me.Adapter.UpdateCommand.Parameters(58).Value = CType(1,Object)
19133                 Me.Adapter.UpdateCommand.Parameters(59).Value = Global.System.DBNull.Value
19134             End If
19135             If (Original_Cash.HasValue = true) Then
19136                 Me.Adapter.UpdateCommand.Parameters(60).Value = CType(0,Object)
19137                 Me.Adapter.UpdateCommand.Parameters(61).Value = CType(Original_Cash.Value,Decimal)
19138             Else
19139                 Me.Adapter.UpdateCommand.Parameters(60).Value = CType(1,Object)
19140                 Me.Adapter.UpdateCommand.Parameters(61).Value = Global.System.DBNull.Value
19141             End If
19142             If (Original_Change.HasValue = true) Then
19143                 Me.Adapter.UpdateCommand.Parameters(62).Value = CType(0,Object)
19144                 Me.Adapter.UpdateCommand.Parameters(63).Value = CType(Original_Change.Value,Decimal)
19145             Else
19146                 Me.Adapter.UpdateCommand.Parameters(62).Value = CType(1,Object)
19147                 Me.Adapter.UpdateCommand.Parameters(63).Value = Global.System.DBNull.Value
19148             End If
19149             If (Original_OperatorID Is Nothing) Then
19150                 Me.Adapter.UpdateCommand.Parameters(64).Value = CType(1,Object)
19151                 Me.Adapter.UpdateCommand.Parameters(65).Value = Global.System.DBNull.Value
19152             Else
19153                 Me.Adapter.UpdateCommand.Parameters(64).Value = CType(0,Object)
19154                 Me.Adapter.UpdateCommand.Parameters(65).Value = CType(Original_OperatorID,String)
19155             End If
19156             If (Original_BillNote Is Nothing) Then
19157                 Me.Adapter.UpdateCommand.Parameters(66).Value = CType(1,Object)
19158                 Me.Adapter.UpdateCommand.Parameters(67).Value = Global.System.DBNull.Value
19159             Else
19160                 Me.Adapter.UpdateCommand.Parameters(66).Value = CType(0,Object)
19161                 Me.Adapter.UpdateCommand.Parameters(67).Value = CType(Original_BillNote,String)
19162             End If
19163             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
19164             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
19165                         <> Global.System.Data.ConnectionState.Open) Then
19166                 Me.Adapter.UpdateCommand.Connection.Open
19167             End If
19168             Try
19169                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
19170                 Return returnValue
19171             Finally
19172                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
19173                     Me.Adapter.UpdateCommand.Connection.Close
19174                 End If
19175             End Try
19176         End Function
19177         
19178         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19179          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
19180          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
19181          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
19182         Public Overloads Overridable Function Update( _
19183                     ByVal BillType As String, _
19184                     ByVal BillDate As Global.System.Nullable(Of Date), _
19185                     ByVal CustomerName As String, _
19186                     ByVal AddressLine1 As String, _
19187                     ByVal AddressLine2 As String, _
19188                     ByVal AddressLine3 As String, _
19189                     ByVal ContactNo As String, _
19190                     ByVal PaymentMode As String, _
19191                     ByVal SubTotal As Global.System.Nullable(Of Decimal), _
19192                     ByVal ItemDiscount As Global.System.Nullable(Of Decimal), _
19193                     ByVal DiscountPer As Global.System.Nullable(Of Decimal), _
19194                     ByVal Discount As Global.System.Nullable(Of Decimal), _
19195                     ByVal VAT As Global.System.Nullable(Of Decimal), _
19196                     ByVal ServiceTax As Global.System.Nullable(Of Decimal), _
19197                     ByVal ServiceCharges As Global.System.Nullable(Of Decimal), _
19198                     ByVal TACharges As Global.System.Nullable(Of Decimal), _
19199                     ByVal HDCharges As Global.System.Nullable(Of Decimal), _
19200                     ByVal GrandTotal As Global.System.Nullable(Of Decimal), _
19201                     ByVal Cash As Global.System.Nullable(Of Decimal), _
19202                     ByVal Change As Global.System.Nullable(Of Decimal), _
19203                     ByVal OperatorID As String, _
19204                     ByVal BillNote As String, _
19205                     ByVal Original_BillId As Global.System.Nullable(Of Integer), _
19206                     ByVal Original_BillType As String, _
19207                     ByVal Original_BillDate As Global.System.Nullable(Of Date), _
19208                     ByVal Original_CustomerName As String, _
19209                     ByVal Original_AddressLine1 As String, _
19210                     ByVal Original_AddressLine2 As String, _
19211                     ByVal Original_AddressLine3 As String, _
19212                     ByVal Original_ContactNo As String, _
19213                     ByVal Original_PaymentMode As String, _
19214                     ByVal Original_SubTotal As Global.System.Nullable(Of Decimal), _
19215                     ByVal Original_ItemDiscount As Global.System.Nullable(Of Decimal), _
19216                     ByVal Original_DiscountPer As Global.System.Nullable(Of Decimal), _
19217                     ByVal Original_Discount As Global.System.Nullable(Of Decimal), _
19218                     ByVal Original_VAT As Global.System.Nullable(Of Decimal), _
19219                     ByVal Original_ServiceTax As Global.System.Nullable(Of Decimal), _
19220                     ByVal Original_ServiceCharges As Global.System.Nullable(Of Decimal), _
19221                     ByVal Original_TACharges As Global.System.Nullable(Of Decimal), _
19222                     ByVal Original_HDCharges As Global.System.Nullable(Of Decimal), _
19223                     ByVal Original_GrandTotal As Global.System.Nullable(Of Decimal), _
19224                     ByVal Original_Cash As Global.System.Nullable(Of Decimal), _
19225                     ByVal Original_Change As Global.System.Nullable(Of Decimal), _
19226                     ByVal Original_OperatorID As String, _
19227                     ByVal Original_BillNote As String) As Integer
19228             Return Me.Update(Original_BillId, BillType, BillDate, CustomerName, AddressLine1, AddressLine2, AddressLine3, ContactNo, PaymentMode, SubTotal, ItemDiscount, DiscountPer, Discount, VAT, ServiceTax, ServiceCharges, TACharges, HDCharges, GrandTotal, Cash, Change, OperatorID, BillNote, Original_BillId, Original_BillType, Original_BillDate, Original_CustomerName, Original_AddressLine1, Original_AddressLine2, Original_AddressLine3, Original_ContactNo, Original_PaymentMode, Original_SubTotal, Original_ItemDiscount, Original_DiscountPer, Original_Discount, Original_VAT, Original_ServiceTax, Original_ServiceCharges, Original_TACharges, Original_HDCharges, Original_GrandTotal, Original_Cash, Original_Change, Original_OperatorID, Original_BillNote)
19229         End Function
19230     End Class
19231     
19232     '''<summary>
19233     '''Represents the connection and commands used to retrieve and save data.
19234     '''</summary>
19235     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
19236      Global.System.ComponentModel.ToolboxItem(true), _
19237      Global.System.ComponentModel.DataObjectAttribute(true), _
19238      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
19239         ", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
19240      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
19241     Partial Public Class RestaurantBillingItemsTableAdapter
19242         Inherits Global.System.ComponentModel.Component
19243         
19244         Private WithEvents _adapter As Global.System.Data.OleDb.OleDbDataAdapter
19245         
19246         Private _connection As Global.System.Data.OleDb.OleDbConnection
19247         
19248         Private _transaction As Global.System.Data.OleDb.OleDbTransaction
19249         
19250         Private _commandCollection() As Global.System.Data.OleDb.OleDbCommand
19251         
19252         Private _clearBeforeFill As Boolean
19253         
19254         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19255          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
19256         Public Sub New()
19257             MyBase.New
19258             Me.ClearBeforeFill = true
19259         End Sub
19260         
19261         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19262          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
19263         Protected Friend ReadOnly Property Adapter() As Global.System.Data.OleDb.OleDbDataAdapter
19264             Get
19265                 If (Me._adapter Is Nothing) Then
19266                     Me.InitAdapter
19267                 End If
19268                 Return Me._adapter
19269             End Get
19270         End Property
19271         
19272         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19273          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
19274         Friend Property Connection() As Global.System.Data.OleDb.OleDbConnection
19275             Get
19276                 If (Me._connection Is Nothing) Then
19277                     Me.InitConnection
19278                 End If
19279                 Return Me._connection
19280             End Get
19281             Set
19282                 Me._connection = value
19283                 If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
19284                     Me.Adapter.InsertCommand.Connection = value
19285                 End If
19286                 If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
19287                     Me.Adapter.DeleteCommand.Connection = value
19288                 End If
19289                 If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
19290                     Me.Adapter.UpdateCommand.Connection = value
19291                 End If
19292                 Dim i As Integer = 0
19293                 Do While (i < Me.CommandCollection.Length)
19294                     If (Not (Me.CommandCollection(i)) Is Nothing) Then
19295                         CType(Me.CommandCollection(i),Global.System.Data.OleDb.OleDbCommand).Connection = value
19296                     End If
19297                     i = (i + 1)
19298                 Loop
19299             End Set
19300         End Property
19301         
19302         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19303          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
19304         Friend Property Transaction() As Global.System.Data.OleDb.OleDbTransaction
19305             Get
19306                 Return Me._transaction
19307             End Get
19308             Set
19309                 Me._transaction = value
19310                 Dim i As Integer = 0
19311                 Do While (i < Me.CommandCollection.Length)
19312                     Me.CommandCollection(i).Transaction = Me._transaction
19313                     i = (i + 1)
19314                 Loop
19315                 If ((Not (Me.Adapter) Is Nothing) _
19316                             AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
19317                     Me.Adapter.DeleteCommand.Transaction = Me._transaction
19318                 End If
19319                 If ((Not (Me.Adapter) Is Nothing) _
19320                             AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
19321                     Me.Adapter.InsertCommand.Transaction = Me._transaction
19322                 End If
19323                 If ((Not (Me.Adapter) Is Nothing) _
19324                             AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
19325                     Me.Adapter.UpdateCommand.Transaction = Me._transaction
19326                 End If
19327             End Set
19328         End Property
19329         
19330         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19331          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
19332         Protected ReadOnly Property CommandCollection() As Global.System.Data.OleDb.OleDbCommand()
19333             Get
19334                 If (Me._commandCollection Is Nothing) Then
19335                     Me.InitCommandCollection
19336                 End If
19337                 Return Me._commandCollection
19338             End Get
19339         End Property
19340         
19341         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19342          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
19343         Public Property ClearBeforeFill() As Boolean
19344             Get
19345                 Return Me._clearBeforeFill
19346             End Get
19347             Set
19348                 Me._clearBeforeFill = value
19349             End Set
19350         End Property
19351         
19352         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19353          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
19354         Private Sub InitAdapter()
19355             Me._adapter = New Global.System.Data.OleDb.OleDbDataAdapter()
19356             Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
19357             tableMapping.SourceTable = "Table"
19358             tableMapping.DataSetTable = "RestaurantBillingItems"
19359             tableMapping.ColumnMappings.Add("P_ID", "P_ID")
19360             tableMapping.ColumnMappings.Add("B_ID", "B_ID")
19361             tableMapping.ColumnMappings.Add("Item_ID", "Item_ID")
19362             tableMapping.ColumnMappings.Add("Qty", "Qty")
19363             tableMapping.ColumnMappings.Add("Rate", "Rate")
19364             tableMapping.ColumnMappings.Add("Amount", "Amount")
19365             tableMapping.ColumnMappings.Add("DiscPer", "DiscPer")
19366             tableMapping.ColumnMappings.Add("Disc", "Disc")
19367             tableMapping.ColumnMappings.Add("VATPer", "VATPer")
19368             tableMapping.ColumnMappings.Add("VATAmt", "VATAmt")
19369             tableMapping.ColumnMappings.Add("STPer", "STPer")
19370             tableMapping.ColumnMappings.Add("STAmt", "STAmt")
19371             tableMapping.ColumnMappings.Add("SCPer", "SCPer")
19372             tableMapping.ColumnMappings.Add("SCAmt", "SCAmt")
19373             tableMapping.ColumnMappings.Add("TotalAmt", "TotalAmt")
19374             tableMapping.ColumnMappings.Add("ItemNote", "ItemNote")
19375             tableMapping.ColumnMappings.Add("TableNo", "TableNo")
19376             tableMapping.ColumnMappings.Add("GroupName", "GroupName")
19377             Me._adapter.TableMappings.Add(tableMapping)
19378             Me._adapter.DeleteCommand = New Global.System.Data.OleDb.OleDbCommand()
19379             Me._adapter.DeleteCommand.Connection = Me.Connection
19380             Me._adapter.DeleteCommand.CommandText = "DELETE FROM `RestaurantBillingItems` WHERE ((`P_ID` = ?) AND ((? = 1 AND `B_ID` I"& _
19381                 "S NULL) OR (`B_ID` = ?)) AND ((? = 1 AND `Item_ID` IS NULL) OR (`Item_ID` = ?)) "& _
19382                 "AND ((? = 1 AND `Qty` IS NULL) OR (`Qty` = ?)) AND ((? = 1 AND `Rate` IS NULL) O"& _
19383                 "R (`Rate` = ?)) AND ((? = 1 AND `Amount` IS NULL) OR (`Amount` = ?)) AND ((? = 1"& _
19384                 " AND `DiscPer` IS NULL) OR (`DiscPer` = ?)) AND ((? = 1 AND `Disc` IS NULL) OR ("& _
19385                 "`Disc` = ?)) AND ((? = 1 AND `VATPer` IS NULL) OR (`VATPer` = ?)) AND ((? = 1 AN"& _
19386                 "D `VATAmt` IS NULL) OR (`VATAmt` = ?)) AND ((? = 1 AND `STPer` IS NULL) OR (`STP"& _
19387                 "er` = ?)) AND ((? = 1 AND `STAmt` IS NULL) OR (`STAmt` = ?)) AND ((? = 1 AND `SC"& _
19388                 "Per` IS NULL) OR (`SCPer` = ?)) AND ((? = 1 AND `SCAmt` IS NULL) OR (`SCAmt` = ?"& _
19389                 ")) AND ((? = 1 AND `TotalAmt` IS NULL) OR (`TotalAmt` = ?)) AND ((? = 1 AND `Ite"& _
19390                 "mNote` IS NULL) OR (`ItemNote` = ?)) AND ((? = 1 AND `TableNo` IS NULL) OR (`Tab"& _
19391                 "leNo` = ?)) AND ((? = 1 AND `GroupName` IS NULL) OR (`GroupName` = ?)))"
19392             Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
19393             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_P_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "P_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
19394             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_B_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "B_ID", Global.System.Data.DataRowVersion.Original, true, Nothing))
19395             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_B_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "B_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
19396             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Original, true, Nothing))
19397             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
19398             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Qty", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Qty", Global.System.Data.DataRowVersion.Original, true, Nothing))
19399             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Qty", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Qty", Global.System.Data.DataRowVersion.Original, false, Nothing))
19400             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Rate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Rate", Global.System.Data.DataRowVersion.Original, true, Nothing))
19401             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Original, false, Nothing))
19402             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Amount", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Amount", Global.System.Data.DataRowVersion.Original, true, Nothing))
19403             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Amount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Amount", Global.System.Data.DataRowVersion.Original, false, Nothing))
19404             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_DiscPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "DiscPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
19405             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_DiscPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
19406             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Disc", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Disc", Global.System.Data.DataRowVersion.Original, true, Nothing))
19407             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Disc", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Disc", Global.System.Data.DataRowVersion.Original, false, Nothing))
19408             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VATPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VATPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
19409             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VATPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
19410             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VATAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VATAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
19411             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VATAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
19412             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_STPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
19413             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_STPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
19414             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_STAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
19415             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_STAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
19416             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SCPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SCPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
19417             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SCPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
19418             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SCAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SCAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
19419             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SCAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
19420             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TotalAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
19421             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TotalAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
19422             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ItemNote", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Original, true, Nothing))
19423             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ItemNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Original, false, Nothing))
19424             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TableNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
19425             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
19426             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_GroupName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Original, true, Nothing))
19427             Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_GroupName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Original, false, Nothing))
19428             Me._adapter.InsertCommand = New Global.System.Data.OleDb.OleDbCommand()
19429             Me._adapter.InsertCommand.Connection = Me.Connection
19430             Me._adapter.InsertCommand.CommandText = "INSERT INTO `RestaurantBillingItems` (`B_ID`, `Item_ID`, `Qty`, `Rate`, `Amount`,"& _
19431                 " `DiscPer`, `Disc`, `VATPer`, `VATAmt`, `STPer`, `STAmt`, `SCPer`, `SCAmt`, `Tot"& _
19432                 "alAmt`, `ItemNote`, `TableNo`, `GroupName`) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?"& _
19433                 ", ?, ?, ?, ?, ?, ?, ?)"
19434             Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
19435             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("B_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "B_ID", Global.System.Data.DataRowVersion.Current, false, Nothing))
19436             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Current, false, Nothing))
19437             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Qty", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Qty", Global.System.Data.DataRowVersion.Current, false, Nothing))
19438             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Current, false, Nothing))
19439             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Amount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Amount", Global.System.Data.DataRowVersion.Current, false, Nothing))
19440             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("DiscPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
19441             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Disc", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Disc", Global.System.Data.DataRowVersion.Current, false, Nothing))
19442             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VATPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
19443             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VATAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
19444             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("STPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
19445             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("STAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
19446             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SCPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
19447             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SCAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
19448             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TotalAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
19449             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ItemNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Current, false, Nothing))
19450             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
19451             Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("GroupName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Current, false, Nothing))
19452             Me._adapter.UpdateCommand = New Global.System.Data.OleDb.OleDbCommand()
19453             Me._adapter.UpdateCommand.Connection = Me.Connection
19454             Me._adapter.UpdateCommand.CommandText = "UPDATE `RestaurantBillingItems` SET `B_ID` = ?, `Item_ID` = ?, `Qty` = ?, `Rate` "& _
19455                 "= ?, `Amount` = ?, `DiscPer` = ?, `Disc` = ?, `VATPer` = ?, `VATAmt` = ?, `STPer"& _
19456                 "` = ?, `STAmt` = ?, `SCPer` = ?, `SCAmt` = ?, `TotalAmt` = ?, `ItemNote` = ?, `T"& _
19457                 "ableNo` = ?, `GroupName` = ? WHERE ((`P_ID` = ?) AND ((? = 1 AND `B_ID` IS NULL)"& _
19458                 " OR (`B_ID` = ?)) AND ((? = 1 AND `Item_ID` IS NULL) OR (`Item_ID` = ?)) AND ((?"& _
19459                 " = 1 AND `Qty` IS NULL) OR (`Qty` = ?)) AND ((? = 1 AND `Rate` IS NULL) OR (`Rat"& _
19460                 "e` = ?)) AND ((? = 1 AND `Amount` IS NULL) OR (`Amount` = ?)) AND ((? = 1 AND `D"& _
19461                 "iscPer` IS NULL) OR (`DiscPer` = ?)) AND ((? = 1 AND `Disc` IS NULL) OR (`Disc` "& _
19462                 "= ?)) AND ((? = 1 AND `VATPer` IS NULL) OR (`VATPer` = ?)) AND ((? = 1 AND `VATA"& _
19463                 "mt` IS NULL) OR (`VATAmt` = ?)) AND ((? = 1 AND `STPer` IS NULL) OR (`STPer` = ?"& _
19464                 ")) AND ((? = 1 AND `STAmt` IS NULL) OR (`STAmt` = ?)) AND ((? = 1 AND `SCPer` IS"& _
19465                 " NULL) OR (`SCPer` = ?)) AND ((? = 1 AND `SCAmt` IS NULL) OR (`SCAmt` = ?)) AND "& _
19466                 "((? = 1 AND `TotalAmt` IS NULL) OR (`TotalAmt` = ?)) AND ((? = 1 AND `ItemNote` "& _
19467                 "IS NULL) OR (`ItemNote` = ?)) AND ((? = 1 AND `TableNo` IS NULL) OR (`TableNo` ="& _
19468                 " ?)) AND ((? = 1 AND `GroupName` IS NULL) OR (`GroupName` = ?)))"
19469             Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
19470             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("B_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "B_ID", Global.System.Data.DataRowVersion.Current, false, Nothing))
19471             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Current, false, Nothing))
19472             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Qty", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Qty", Global.System.Data.DataRowVersion.Current, false, Nothing))
19473             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Current, false, Nothing))
19474             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Amount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Amount", Global.System.Data.DataRowVersion.Current, false, Nothing))
19475             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("DiscPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
19476             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Disc", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Disc", Global.System.Data.DataRowVersion.Current, false, Nothing))
19477             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VATPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
19478             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("VATAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
19479             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("STPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
19480             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("STAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
19481             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SCPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCPer", Global.System.Data.DataRowVersion.Current, false, Nothing))
19482             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("SCAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
19483             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TotalAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Current, false, Nothing))
19484             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("ItemNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Current, false, Nothing))
19485             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Current, false, Nothing))
19486             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("GroupName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Current, false, Nothing))
19487             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_P_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "P_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
19488             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_B_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "B_ID", Global.System.Data.DataRowVersion.Original, true, Nothing))
19489             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_B_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "B_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
19490             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Original, true, Nothing))
19491             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Item_ID", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Item_ID", Global.System.Data.DataRowVersion.Original, false, Nothing))
19492             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Qty", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Qty", Global.System.Data.DataRowVersion.Original, true, Nothing))
19493             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Qty", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Qty", Global.System.Data.DataRowVersion.Original, false, Nothing))
19494             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Rate", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Rate", Global.System.Data.DataRowVersion.Original, true, Nothing))
19495             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Rate", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Rate", Global.System.Data.DataRowVersion.Original, false, Nothing))
19496             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Amount", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Amount", Global.System.Data.DataRowVersion.Original, true, Nothing))
19497             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Amount", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Amount", Global.System.Data.DataRowVersion.Original, false, Nothing))
19498             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_DiscPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "DiscPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
19499             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_DiscPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "DiscPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
19500             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_Disc", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "Disc", Global.System.Data.DataRowVersion.Original, true, Nothing))
19501             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_Disc", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "Disc", Global.System.Data.DataRowVersion.Original, false, Nothing))
19502             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VATPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VATPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
19503             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VATPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
19504             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_VATAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "VATAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
19505             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_VATAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "VATAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
19506             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_STPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
19507             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_STPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
19508             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_STAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "STAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
19509             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_STAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "STAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
19510             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SCPer", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SCPer", Global.System.Data.DataRowVersion.Original, true, Nothing))
19511             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SCPer", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCPer", Global.System.Data.DataRowVersion.Original, false, Nothing))
19512             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_SCAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "SCAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
19513             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_SCAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "SCAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
19514             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TotalAmt", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Original, true, Nothing))
19515             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TotalAmt", Global.System.Data.OleDb.OleDbType.Numeric, 0, Global.System.Data.ParameterDirection.Input, CType(18,Byte), CType(2,Byte), "TotalAmt", Global.System.Data.DataRowVersion.Original, false, Nothing))
19516             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_ItemNote", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Original, true, Nothing))
19517             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_ItemNote", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "ItemNote", Global.System.Data.DataRowVersion.Original, false, Nothing))
19518             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_TableNo", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Original, true, Nothing))
19519             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_TableNo", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "TableNo", Global.System.Data.DataRowVersion.Original, false, Nothing))
19520             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("IsNull_GroupName", Global.System.Data.OleDb.OleDbType.[Integer], 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Original, true, Nothing))
19521             Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.OleDb.OleDbParameter("Original_GroupName", Global.System.Data.OleDb.OleDbType.VarWChar, 0, Global.System.Data.ParameterDirection.Input, CType(0,Byte), CType(0,Byte), "GroupName", Global.System.Data.DataRowVersion.Original, false, Nothing))
19522         End Sub
19523         
19524         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19525          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
19526         Private Sub InitConnection()
19527             Me._connection = New Global.System.Data.OleDb.OleDbConnection()
19528             Me._connection.ConnectionString = Global.Restaurant_Management_System.My.MySettings.Default.RPOS_DBConnectionString
19529         End Sub
19530         
19531         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19532          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
19533         Private Sub InitCommandCollection()
19534             Me._commandCollection = New Global.System.Data.OleDb.OleDbCommand(0) {}
19535             Me._commandCollection(0) = New Global.System.Data.OleDb.OleDbCommand()
19536             Me._commandCollection(0).Connection = Me.Connection
19537             Me._commandCollection(0).CommandText = "SELECT P_ID, B_ID, Item_ID, Qty, Rate, Amount, DiscPer, Disc, VATPer, VATAmt, STP"& _
19538                 "er, STAmt, SCPer, SCAmt, TotalAmt, ItemNote, TableNo, GroupName FROM RestaurantB"& _
19539                 "illingItems"
19540             Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
19541         End Sub
19542         
19543         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19544          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
19545          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
19546          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
19547         Public Overloads Overridable Function Fill(ByVal dataTable As RPOS_DBDataSet.RestaurantBillingItemsDataTable) As Integer
19548             Me.Adapter.SelectCommand = Me.CommandCollection(0)
19549             If (Me.ClearBeforeFill = true) Then
19550                 dataTable.Clear
19551             End If
19552             Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
19553             Return returnValue
19554         End Function
19555         
19556         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19557          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
19558          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
19559          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
19560         Public Overloads Overridable Function GetData() As RPOS_DBDataSet.RestaurantBillingItemsDataTable
19561             Me.Adapter.SelectCommand = Me.CommandCollection(0)
19562             Dim dataTable As RPOS_DBDataSet.RestaurantBillingItemsDataTable = New RPOS_DBDataSet.RestaurantBillingItemsDataTable()
19563             Me.Adapter.Fill(dataTable)
19564             Return dataTable
19565         End Function
19566         
19567         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19568          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
19569          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
19570         Public Overloads Overridable Function Update(ByVal dataTable As RPOS_DBDataSet.RestaurantBillingItemsDataTable) As Integer
19571             Return Me.Adapter.Update(dataTable)
19572         End Function
19573         
19574         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19575          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
19576          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
19577         Public Overloads Overridable Function Update(ByVal dataSet As RPOS_DBDataSet) As Integer
19578             Return Me.Adapter.Update(dataSet, "RestaurantBillingItems")
19579         End Function
19580         
19581         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19582          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
19583          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
19584         Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
19585             Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
19586         End Function
19587         
19588         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19589          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
19590          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
19591         Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
19592             Return Me.Adapter.Update(dataRows)
19593         End Function
19594         
19595         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19596          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
19597          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
19598          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
19599         Public Overloads Overridable Function Delete( _
19600                     ByVal Original_P_ID As Integer, _
19601                     ByVal Original_B_ID As Global.System.Nullable(Of Integer), _
19602                     ByVal Original_Item_ID As Global.System.Nullable(Of Integer), _
19603                     ByVal Original_Qty As Global.System.Nullable(Of Decimal), _
19604                     ByVal Original_Rate As Global.System.Nullable(Of Decimal), _
19605                     ByVal Original_Amount As Global.System.Nullable(Of Decimal), _
19606                     ByVal Original_DiscPer As Global.System.Nullable(Of Decimal), _
19607                     ByVal Original_Disc As Global.System.Nullable(Of Decimal), _
19608                     ByVal Original_VATPer As Global.System.Nullable(Of Decimal), _
19609                     ByVal Original_VATAmt As Global.System.Nullable(Of Decimal), _
19610                     ByVal Original_STPer As Global.System.Nullable(Of Decimal), _
19611                     ByVal Original_STAmt As Global.System.Nullable(Of Decimal), _
19612                     ByVal Original_SCPer As Global.System.Nullable(Of Decimal), _
19613                     ByVal Original_SCAmt As Global.System.Nullable(Of Decimal), _
19614                     ByVal Original_TotalAmt As Global.System.Nullable(Of Decimal), _
19615                     ByVal Original_ItemNote As String, _
19616                     ByVal Original_TableNo As String, _
19617                     ByVal Original_GroupName As String) As Integer
19618             Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_P_ID,Integer)
19619             If (Original_B_ID.HasValue = true) Then
19620                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
19621                 Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_B_ID.Value,Integer)
19622             Else
19623                 Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
19624                 Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
19625             End If
19626             If (Original_Item_ID.HasValue = true) Then
19627                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
19628                 Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_Item_ID.Value,Integer)
19629             Else
19630                 Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
19631                 Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
19632             End If
19633             If (Original_Qty.HasValue = true) Then
19634                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
19635                 Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_Qty.Value,Decimal)
19636             Else
19637                 Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
19638                 Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
19639             End If
19640             If (Original_Rate.HasValue = true) Then
19641                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(0,Object)
19642                 Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_Rate.Value,Decimal)
19643             Else
19644                 Me.Adapter.DeleteCommand.Parameters(7).Value = CType(1,Object)
19645                 Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
19646             End If
19647             If (Original_Amount.HasValue = true) Then
19648                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(0,Object)
19649                 Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_Amount.Value,Decimal)
19650             Else
19651                 Me.Adapter.DeleteCommand.Parameters(9).Value = CType(1,Object)
19652                 Me.Adapter.DeleteCommand.Parameters(10).Value = Global.System.DBNull.Value
19653             End If
19654             If (Original_DiscPer.HasValue = true) Then
19655                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(0,Object)
19656                 Me.Adapter.DeleteCommand.Parameters(12).Value = CType(Original_DiscPer.Value,Decimal)
19657             Else
19658                 Me.Adapter.DeleteCommand.Parameters(11).Value = CType(1,Object)
19659                 Me.Adapter.DeleteCommand.Parameters(12).Value = Global.System.DBNull.Value
19660             End If
19661             If (Original_Disc.HasValue = true) Then
19662                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(0,Object)
19663                 Me.Adapter.DeleteCommand.Parameters(14).Value = CType(Original_Disc.Value,Decimal)
19664             Else
19665                 Me.Adapter.DeleteCommand.Parameters(13).Value = CType(1,Object)
19666                 Me.Adapter.DeleteCommand.Parameters(14).Value = Global.System.DBNull.Value
19667             End If
19668             If (Original_VATPer.HasValue = true) Then
19669                 Me.Adapter.DeleteCommand.Parameters(15).Value = CType(0,Object)
19670                 Me.Adapter.DeleteCommand.Parameters(16).Value = CType(Original_VATPer.Value,Decimal)
19671             Else
19672                 Me.Adapter.DeleteCommand.Parameters(15).Value = CType(1,Object)
19673                 Me.Adapter.DeleteCommand.Parameters(16).Value = Global.System.DBNull.Value
19674             End If
19675             If (Original_VATAmt.HasValue = true) Then
19676                 Me.Adapter.DeleteCommand.Parameters(17).Value = CType(0,Object)
19677                 Me.Adapter.DeleteCommand.Parameters(18).Value = CType(Original_VATAmt.Value,Decimal)
19678             Else
19679                 Me.Adapter.DeleteCommand.Parameters(17).Value = CType(1,Object)
19680                 Me.Adapter.DeleteCommand.Parameters(18).Value = Global.System.DBNull.Value
19681             End If
19682             If (Original_STPer.HasValue = true) Then
19683                 Me.Adapter.DeleteCommand.Parameters(19).Value = CType(0,Object)
19684                 Me.Adapter.DeleteCommand.Parameters(20).Value = CType(Original_STPer.Value,Decimal)
19685             Else
19686                 Me.Adapter.DeleteCommand.Parameters(19).Value = CType(1,Object)
19687                 Me.Adapter.DeleteCommand.Parameters(20).Value = Global.System.DBNull.Value
19688             End If
19689             If (Original_STAmt.HasValue = true) Then
19690                 Me.Adapter.DeleteCommand.Parameters(21).Value = CType(0,Object)
19691                 Me.Adapter.DeleteCommand.Parameters(22).Value = CType(Original_STAmt.Value,Decimal)
19692             Else
19693                 Me.Adapter.DeleteCommand.Parameters(21).Value = CType(1,Object)
19694                 Me.Adapter.DeleteCommand.Parameters(22).Value = Global.System.DBNull.Value
19695             End If
19696             If (Original_SCPer.HasValue = true) Then
19697                 Me.Adapter.DeleteCommand.Parameters(23).Value = CType(0,Object)
19698                 Me.Adapter.DeleteCommand.Parameters(24).Value = CType(Original_SCPer.Value,Decimal)
19699             Else
19700                 Me.Adapter.DeleteCommand.Parameters(23).Value = CType(1,Object)
19701                 Me.Adapter.DeleteCommand.Parameters(24).Value = Global.System.DBNull.Value
19702             End If
19703             If (Original_SCAmt.HasValue = true) Then
19704                 Me.Adapter.DeleteCommand.Parameters(25).Value = CType(0,Object)
19705                 Me.Adapter.DeleteCommand.Parameters(26).Value = CType(Original_SCAmt.Value,Decimal)
19706             Else
19707                 Me.Adapter.DeleteCommand.Parameters(25).Value = CType(1,Object)
19708                 Me.Adapter.DeleteCommand.Parameters(26).Value = Global.System.DBNull.Value
19709             End If
19710             If (Original_TotalAmt.HasValue = true) Then
19711                 Me.Adapter.DeleteCommand.Parameters(27).Value = CType(0,Object)
19712                 Me.Adapter.DeleteCommand.Parameters(28).Value = CType(Original_TotalAmt.Value,Decimal)
19713             Else
19714                 Me.Adapter.DeleteCommand.Parameters(27).Value = CType(1,Object)
19715                 Me.Adapter.DeleteCommand.Parameters(28).Value = Global.System.DBNull.Value
19716             End If
19717             If (Original_ItemNote Is Nothing) Then
19718                 Me.Adapter.DeleteCommand.Parameters(29).Value = CType(1,Object)
19719                 Me.Adapter.DeleteCommand.Parameters(30).Value = Global.System.DBNull.Value
19720             Else
19721                 Me.Adapter.DeleteCommand.Parameters(29).Value = CType(0,Object)
19722                 Me.Adapter.DeleteCommand.Parameters(30).Value = CType(Original_ItemNote,String)
19723             End If
19724             If (Original_TableNo Is Nothing) Then
19725                 Me.Adapter.DeleteCommand.Parameters(31).Value = CType(1,Object)
19726                 Me.Adapter.DeleteCommand.Parameters(32).Value = Global.System.DBNull.Value
19727             Else
19728                 Me.Adapter.DeleteCommand.Parameters(31).Value = CType(0,Object)
19729                 Me.Adapter.DeleteCommand.Parameters(32).Value = CType(Original_TableNo,String)
19730             End If
19731             If (Original_GroupName Is Nothing) Then
19732                 Me.Adapter.DeleteCommand.Parameters(33).Value = CType(1,Object)
19733                 Me.Adapter.DeleteCommand.Parameters(34).Value = Global.System.DBNull.Value
19734             Else
19735                 Me.Adapter.DeleteCommand.Parameters(33).Value = CType(0,Object)
19736                 Me.Adapter.DeleteCommand.Parameters(34).Value = CType(Original_GroupName,String)
19737             End If
19738             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
19739             If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
19740                         <> Global.System.Data.ConnectionState.Open) Then
19741                 Me.Adapter.DeleteCommand.Connection.Open
19742             End If
19743             Try
19744                 Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
19745                 Return returnValue
19746             Finally
19747                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
19748                     Me.Adapter.DeleteCommand.Connection.Close
19749                 End If
19750             End Try
19751         End Function
19752         
19753         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19754          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
19755          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
19756          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
19757         Public Overloads Overridable Function Insert( _
19758                     ByVal B_ID As Global.System.Nullable(Of Integer), _
19759                     ByVal Item_ID As Global.System.Nullable(Of Integer), _
19760                     ByVal Qty As Global.System.Nullable(Of Decimal), _
19761                     ByVal Rate As Global.System.Nullable(Of Decimal), _
19762                     ByVal Amount As Global.System.Nullable(Of Decimal), _
19763                     ByVal DiscPer As Global.System.Nullable(Of Decimal), _
19764                     ByVal Disc As Global.System.Nullable(Of Decimal), _
19765                     ByVal VATPer As Global.System.Nullable(Of Decimal), _
19766                     ByVal VATAmt As Global.System.Nullable(Of Decimal), _
19767                     ByVal STPer As Global.System.Nullable(Of Decimal), _
19768                     ByVal STAmt As Global.System.Nullable(Of Decimal), _
19769                     ByVal SCPer As Global.System.Nullable(Of Decimal), _
19770                     ByVal SCAmt As Global.System.Nullable(Of Decimal), _
19771                     ByVal TotalAmt As Global.System.Nullable(Of Decimal), _
19772                     ByVal ItemNote As String, _
19773                     ByVal TableNo As String, _
19774                     ByVal GroupName As String) As Integer
19775             If (B_ID.HasValue = true) Then
19776                 Me.Adapter.InsertCommand.Parameters(0).Value = CType(B_ID.Value,Integer)
19777             Else
19778                 Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
19779             End If
19780             If (Item_ID.HasValue = true) Then
19781                 Me.Adapter.InsertCommand.Parameters(1).Value = CType(Item_ID.Value,Integer)
19782             Else
19783                 Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
19784             End If
19785             If (Qty.HasValue = true) Then
19786                 Me.Adapter.InsertCommand.Parameters(2).Value = CType(Qty.Value,Decimal)
19787             Else
19788                 Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
19789             End If
19790             If (Rate.HasValue = true) Then
19791                 Me.Adapter.InsertCommand.Parameters(3).Value = CType(Rate.Value,Decimal)
19792             Else
19793                 Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
19794             End If
19795             If (Amount.HasValue = true) Then
19796                 Me.Adapter.InsertCommand.Parameters(4).Value = CType(Amount.Value,Decimal)
19797             Else
19798                 Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
19799             End If
19800             If (DiscPer.HasValue = true) Then
19801                 Me.Adapter.InsertCommand.Parameters(5).Value = CType(DiscPer.Value,Decimal)
19802             Else
19803                 Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
19804             End If
19805             If (Disc.HasValue = true) Then
19806                 Me.Adapter.InsertCommand.Parameters(6).Value = CType(Disc.Value,Decimal)
19807             Else
19808                 Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
19809             End If
19810             If (VATPer.HasValue = true) Then
19811                 Me.Adapter.InsertCommand.Parameters(7).Value = CType(VATPer.Value,Decimal)
19812             Else
19813                 Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
19814             End If
19815             If (VATAmt.HasValue = true) Then
19816                 Me.Adapter.InsertCommand.Parameters(8).Value = CType(VATAmt.Value,Decimal)
19817             Else
19818                 Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
19819             End If
19820             If (STPer.HasValue = true) Then
19821                 Me.Adapter.InsertCommand.Parameters(9).Value = CType(STPer.Value,Decimal)
19822             Else
19823                 Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
19824             End If
19825             If (STAmt.HasValue = true) Then
19826                 Me.Adapter.InsertCommand.Parameters(10).Value = CType(STAmt.Value,Decimal)
19827             Else
19828                 Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
19829             End If
19830             If (SCPer.HasValue = true) Then
19831                 Me.Adapter.InsertCommand.Parameters(11).Value = CType(SCPer.Value,Decimal)
19832             Else
19833                 Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
19834             End If
19835             If (SCAmt.HasValue = true) Then
19836                 Me.Adapter.InsertCommand.Parameters(12).Value = CType(SCAmt.Value,Decimal)
19837             Else
19838                 Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
19839             End If
19840             If (TotalAmt.HasValue = true) Then
19841                 Me.Adapter.InsertCommand.Parameters(13).Value = CType(TotalAmt.Value,Decimal)
19842             Else
19843                 Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
19844             End If
19845             If (ItemNote Is Nothing) Then
19846                 Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
19847             Else
19848                 Me.Adapter.InsertCommand.Parameters(14).Value = CType(ItemNote,String)
19849             End If
19850             If (TableNo Is Nothing) Then
19851                 Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
19852             Else
19853                 Me.Adapter.InsertCommand.Parameters(15).Value = CType(TableNo,String)
19854             End If
19855             If (GroupName Is Nothing) Then
19856                 Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
19857             Else
19858                 Me.Adapter.InsertCommand.Parameters(16).Value = CType(GroupName,String)
19859             End If
19860             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
19861             If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
19862                         <> Global.System.Data.ConnectionState.Open) Then
19863                 Me.Adapter.InsertCommand.Connection.Open
19864             End If
19865             Try
19866                 Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
19867                 Return returnValue
19868             Finally
19869                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
19870                     Me.Adapter.InsertCommand.Connection.Close
19871                 End If
19872             End Try
19873         End Function
19874         
19875         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
19876          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
19877          Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
19878          Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
19879         Public Overloads Overridable Function Update( _
19880                     ByVal B_ID As Global.System.Nullable(Of Integer), _
19881                     ByVal Item_ID As Global.System.Nullable(Of Integer), _
19882                     ByVal Qty As Global.System.Nullable(Of Decimal), _
19883                     ByVal Rate As Global.System.Nullable(Of Decimal), _
19884                     ByVal Amount As Global.System.Nullable(Of Decimal), _
19885                     ByVal DiscPer As Global.System.Nullable(Of Decimal), _
19886                     ByVal Disc As Global.System.Nullable(Of Decimal), _
19887                     ByVal VATPer As Global.System.Nullable(Of Decimal), _
19888                     ByVal VATAmt As Global.System.Nullable(Of Decimal), _
19889                     ByVal STPer As Global.System.Nullable(Of Decimal), _
19890                     ByVal STAmt As Global.System.Nullable(Of Decimal), _
19891                     ByVal SCPer As Global.System.Nullable(Of Decimal), _
19892                     ByVal SCAmt As Global.System.Nullable(Of Decimal), _
19893                     ByVal TotalAmt As Global.System.Nullable(Of Decimal), _
19894                     ByVal ItemNote As String, _
19895                     ByVal TableNo As String, _
19896                     ByVal GroupName As String, _
19897                     ByVal Original_P_ID As Integer, _
19898                     ByVal Original_B_ID As Global.System.Nullable(Of Integer), _
19899                     ByVal Original_Item_ID As Global.System.Nullable(Of Integer), _
19900                     ByVal Original_Qty As Global.System.Nullable(Of Decimal), _
19901                     ByVal Original_Rate As Global.System.Nullable(Of Decimal), _
19902                     ByVal Original_Amount As Global.System.Nullable(Of Decimal), _
19903                     ByVal Original_DiscPer As Global.System.Nullable(Of Decimal), _
19904                     ByVal Original_Disc As Global.System.Nullable(Of Decimal), _
19905                     ByVal Original_VATPer As Global.System.Nullable(Of Decimal), _
19906                     ByVal Original_VATAmt As Global.System.Nullable(Of Decimal), _
19907                     ByVal Original_STPer As Global.System.Nullable(Of Decimal), _
19908                     ByVal Original_STAmt As Global.System.Nullable(Of Decimal), _
19909                     ByVal Original_SCPer As Global.System.Nullable(Of Decimal), _
19910                     ByVal Original_SCAmt As Global.System.Nullable(Of Decimal), _
19911                     ByVal Original_TotalAmt As Global.System.Nullable(Of Decimal), _
19912                     ByVal Original_ItemNote As String, _
19913                     ByVal Original_TableNo As String, _
19914                     ByVal Original_GroupName As String) As Integer
19915             If (B_ID.HasValue = true) Then
19916                 Me.Adapter.UpdateCommand.Parameters(0).Value = CType(B_ID.Value,Integer)
19917             Else
19918                 Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
19919             End If
19920             If (Item_ID.HasValue = true) Then
19921                 Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Item_ID.Value,Integer)
19922             Else
19923                 Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
19924             End If
19925             If (Qty.HasValue = true) Then
19926                 Me.Adapter.UpdateCommand.Parameters(2).Value = CType(Qty.Value,Decimal)
19927             Else
19928                 Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
19929             End If
19930             If (Rate.HasValue = true) Then
19931                 Me.Adapter.UpdateCommand.Parameters(3).Value = CType(Rate.Value,Decimal)
19932             Else
19933                 Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
19934             End If
19935             If (Amount.HasValue = true) Then
19936                 Me.Adapter.UpdateCommand.Parameters(4).Value = CType(Amount.Value,Decimal)
19937             Else
19938                 Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
19939             End If
19940             If (DiscPer.HasValue = true) Then
19941                 Me.Adapter.UpdateCommand.Parameters(5).Value = CType(DiscPer.Value,Decimal)
19942             Else
19943                 Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
19944             End If
19945             If (Disc.HasValue = true) Then
19946                 Me.Adapter.UpdateCommand.Parameters(6).Value = CType(Disc.Value,Decimal)
19947             Else
19948                 Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
19949             End If
19950             If (VATPer.HasValue = true) Then
19951                 Me.Adapter.UpdateCommand.Parameters(7).Value = CType(VATPer.Value,Decimal)
19952             Else
19953                 Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
19954             End If
19955             If (VATAmt.HasValue = true) Then
19956                 Me.Adapter.UpdateCommand.Parameters(8).Value = CType(VATAmt.Value,Decimal)
19957             Else
19958                 Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
19959             End If
19960             If (STPer.HasValue = true) Then
19961                 Me.Adapter.UpdateCommand.Parameters(9).Value = CType(STPer.Value,Decimal)
19962             Else
19963                 Me.Adapter.UpdateCommand.Parameters(9).Value = Global.System.DBNull.Value
19964             End If
19965             If (STAmt.HasValue = true) Then
19966                 Me.Adapter.UpdateCommand.Parameters(10).Value = CType(STAmt.Value,Decimal)
19967             Else
19968                 Me.Adapter.UpdateCommand.Parameters(10).Value = Global.System.DBNull.Value
19969             End If
19970             If (SCPer.HasValue = true) Then
19971                 Me.Adapter.UpdateCommand.Parameters(11).Value = CType(SCPer.Value,Decimal)
19972             Else
19973                 Me.Adapter.UpdateCommand.Parameters(11).Value = Global.System.DBNull.Value
19974             End If
19975             If (SCAmt.HasValue = true) Then
19976                 Me.Adapter.UpdateCommand.Parameters(12).Value = CType(SCAmt.Value,Decimal)
19977             Else
19978                 Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
19979             End If
19980             If (TotalAmt.HasValue = true) Then
19981                 Me.Adapter.UpdateCommand.Parameters(13).Value = CType(TotalAmt.Value,Decimal)
19982             Else
19983                 Me.Adapter.UpdateCommand.Parameters(13).Value = Global.System.DBNull.Value
19984             End If
19985             If (ItemNote Is Nothing) Then
19986                 Me.Adapter.UpdateCommand.Parameters(14).Value = Global.System.DBNull.Value
19987             Else
19988                 Me.Adapter.UpdateCommand.Parameters(14).Value = CType(ItemNote,String)
19989             End If
19990             If (TableNo Is Nothing) Then
19991                 Me.Adapter.UpdateCommand.Parameters(15).Value = Global.System.DBNull.Value
19992             Else
19993                 Me.Adapter.UpdateCommand.Parameters(15).Value = CType(TableNo,String)
19994             End If
19995             If (GroupName Is Nothing) Then
19996                 Me.Adapter.UpdateCommand.Parameters(16).Value = Global.System.DBNull.Value
19997             Else
19998                 Me.Adapter.UpdateCommand.Parameters(16).Value = CType(GroupName,String)
19999             End If
20000             Me.Adapter.UpdateCommand.Parameters(17).Value = CType(Original_P_ID,Integer)
20001             If (Original_B_ID.HasValue = true) Then
20002                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(0,Object)
20003                 Me.Adapter.UpdateCommand.Parameters(19).Value = CType(Original_B_ID.Value,Integer)
20004             Else
20005                 Me.Adapter.UpdateCommand.Parameters(18).Value = CType(1,Object)
20006                 Me.Adapter.UpdateCommand.Parameters(19).Value = Global.System.DBNull.Value
20007             End If
20008             If (Original_Item_ID.HasValue = true) Then
20009                 Me.Adapter.UpdateCommand.Parameters(20).Value = CType(0,Object)
20010                 Me.Adapter.UpdateCommand.Parameters(21).Value = CType(Original_Item_ID.Value,Integer)
20011             Else
20012                 Me.Adapter.UpdateCommand.Parameters(20).Value = CType(1,Object)
20013                 Me.Adapter.UpdateCommand.Parameters(21).Value = Global.System.DBNull.Value
20014             End If
20015             If (Original_Qty.HasValue = true) Then
20016                 Me.Adapter.UpdateCommand.Parameters(22).Value = CType(0,Object)
20017                 Me.Adapter.UpdateCommand.Parameters(23).Value = CType(Original_Qty.Value,Decimal)
20018             Else
20019                 Me.Adapter.UpdateCommand.Parameters(22).Value = CType(1,Object)
20020                 Me.Adapter.UpdateCommand.Parameters(23).Value = Global.System.DBNull.Value
20021             End If
20022             If (Original_Rate.HasValue = true) Then
20023                 Me.Adapter.UpdateCommand.Parameters(24).Value = CType(0,Object)
20024                 Me.Adapter.UpdateCommand.Parameters(25).Value = CType(Original_Rate.Value,Decimal)
20025             Else
20026                 Me.Adapter.UpdateCommand.Parameters(24).Value = CType(1,Object)
20027                 Me.Adapter.UpdateCommand.Parameters(25).Value = Global.System.DBNull.Value
20028             End If
20029             If (Original_Amount.HasValue = true) Then
20030                 Me.Adapter.UpdateCommand.Parameters(26).Value = CType(0,Object)
20031                 Me.Adapter.UpdateCommand.Parameters(27).Value = CType(Original_Amount.Value,Decimal)
20032             Else
20033                 Me.Adapter.UpdateCommand.Parameters(26).Value = CType(1,Object)
20034                 Me.Adapter.UpdateCommand.Parameters(27).Value = Global.System.DBNull.Value
20035             End If
20036             If (Original_DiscPer.HasValue = true) Then
20037                 Me.Adapter.UpdateCommand.Parameters(28).Value = CType(0,Object)
20038                 Me.Adapter.UpdateCommand.Parameters(29).Value = CType(Original_DiscPer.Value,Decimal)
20039             Else
20040                 Me.Adapter.UpdateCommand.Parameters(28).Value = CType(1,Object)
20041                 Me.Adapter.UpdateCommand.Parameters(29).Value = Global.System.DBNull.Value
20042             End If
20043             If (Original_Disc.HasValue = true) Then
20044                 Me.Adapter.UpdateCommand.Parameters(30).Value = CType(0,Object)
20045                 Me.Adapter.UpdateCommand.Parameters(31).Value = CType(Original_Disc.Value,Decimal)
20046             Else
20047                 Me.Adapter.UpdateCommand.Parameters(30).Value = CType(1,Object)
20048                 Me.Adapter.UpdateCommand.Parameters(31).Value = Global.System.DBNull.Value
20049             End If
20050             If (Original_VATPer.HasValue = true) Then
20051                 Me.Adapter.UpdateCommand.Parameters(32).Value = CType(0,Object)
20052                 Me.Adapter.UpdateCommand.Parameters(33).Value = CType(Original_VATPer.Value,Decimal)
20053             Else
20054                 Me.Adapter.UpdateCommand.Parameters(32).Value = CType(1,Object)
20055                 Me.Adapter.UpdateCommand.Parameters(33).Value = Global.System.DBNull.Value
20056             End If
20057             If (Original_VATAmt.HasValue = true) Then
20058                 Me.Adapter.UpdateCommand.Parameters(34).Value = CType(0,Object)
20059                 Me.Adapter.UpdateCommand.Parameters(35).Value = CType(Original_VATAmt.Value,Decimal)
20060             Else
20061                 Me.Adapter.UpdateCommand.Parameters(34).Value = CType(1,Object)
20062                 Me.Adapter.UpdateCommand.Parameters(35).Value = Global.System.DBNull.Value
20063             End If
20064             If (Original_STPer.HasValue = true) Then
20065                 Me.Adapter.UpdateCommand.Parameters(36).Value = CType(0,Object)
20066                 Me.Adapter.UpdateCommand.Parameters(37).Value = CType(Original_STPer.Value,Decimal)
20067             Else
20068                 Me.Adapter.UpdateCommand.Parameters(36).Value = CType(1,Object)
20069                 Me.Adapter.UpdateCommand.Parameters(37).Value = Global.System.DBNull.Value
20070             End If
20071             If (Original_STAmt.HasValue = true) Then
20072                 Me.Adapter.UpdateCommand.Parameters(38).Value = CType(0,Object)
20073                 Me.Adapter.UpdateCommand.Parameters(39).Value = CType(Original_STAmt.Value,Decimal)
20074             Else
20075                 Me.Adapter.UpdateCommand.Parameters(38).Value = CType(1,Object)
20076                 Me.Adapter.UpdateCommand.Parameters(39).Value = Global.System.DBNull.Value
20077             End If
20078             If (Original_SCPer.HasValue = true) Then
20079                 Me.Adapter.UpdateCommand.Parameters(40).Value = CType(0,Object)
20080                 Me.Adapter.UpdateCommand.Parameters(41).Value = CType(Original_SCPer.Value,Decimal)
20081             Else
20082                 Me.Adapter.UpdateCommand.Parameters(40).Value = CType(1,Object)
20083                 Me.Adapter.UpdateCommand.Parameters(41).Value = Global.System.DBNull.Value
20084             End If
20085             If (Original_SCAmt.HasValue = true) Then
20086                 Me.Adapter.UpdateCommand.Parameters(42).Value = CType(0,Object)
20087                 Me.Adapter.UpdateCommand.Parameters(43).Value = CType(Original_SCAmt.Value,Decimal)
20088             Else
20089                 Me.Adapter.UpdateCommand.Parameters(42).Value = CType(1,Object)
20090                 Me.Adapter.UpdateCommand.Parameters(43).Value = Global.System.DBNull.Value
20091             End If
20092             If (Original_TotalAmt.HasValue = true) Then
20093                 Me.Adapter.UpdateCommand.Parameters(44).Value = CType(0,Object)
20094                 Me.Adapter.UpdateCommand.Parameters(45).Value = CType(Original_TotalAmt.Value,Decimal)
20095             Else
20096                 Me.Adapter.UpdateCommand.Parameters(44).Value = CType(1,Object)
20097                 Me.Adapter.UpdateCommand.Parameters(45).Value = Global.System.DBNull.Value
20098             End If
20099             If (Original_ItemNote Is Nothing) Then
20100                 Me.Adapter.UpdateCommand.Parameters(46).Value = CType(1,Object)
20101                 Me.Adapter.UpdateCommand.Parameters(47).Value = Global.System.DBNull.Value
20102             Else
20103                 Me.Adapter.UpdateCommand.Parameters(46).Value = CType(0,Object)
20104                 Me.Adapter.UpdateCommand.Parameters(47).Value = CType(Original_ItemNote,String)
20105             End If
20106             If (Original_TableNo Is Nothing) Then
20107                 Me.Adapter.UpdateCommand.Parameters(48).Value = CType(1,Object)
20108                 Me.Adapter.UpdateCommand.Parameters(49).Value = Global.System.DBNull.Value
20109             Else
20110                 Me.Adapter.UpdateCommand.Parameters(48).Value = CType(0,Object)
20111                 Me.Adapter.UpdateCommand.Parameters(49).Value = CType(Original_TableNo,String)
20112             End If
20113             If (Original_GroupName Is Nothing) Then
20114                 Me.Adapter.UpdateCommand.Parameters(50).Value = CType(1,Object)
20115                 Me.Adapter.UpdateCommand.Parameters(51).Value = Global.System.DBNull.Value
20116             Else
20117                 Me.Adapter.UpdateCommand.Parameters(50).Value = CType(0,Object)
20118                 Me.Adapter.UpdateCommand.Parameters(51).Value = CType(Original_GroupName,String)
20119             End If
20120             Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
20121             If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
20122                         <> Global.System.Data.ConnectionState.Open) Then
20123                 Me.Adapter.UpdateCommand.Connection.Open
20124             End If
20125             Try
20126                 Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
20127                 Return returnValue
20128             Finally
20129                 If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
20130                     Me.Adapter.UpdateCommand.Connection.Close
20131                 End If
20132             End Try
20133         End Function
20134     End Class
20135     
20136     '''<summary>
20137     '''TableAdapterManager is used to coordinate TableAdapters in the dataset to enable Hierarchical Update scenarios
20138     '''</summary>
20139     <Global.System.ComponentModel.DesignerCategoryAttribute("code"), _
20140      Global.System.ComponentModel.ToolboxItem(true), _
20141      Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerDesigner, Microsoft.VSD"& _
20142         "esigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
20143      Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapterManager")> _
20144     Partial Public Class TableAdapterManager
20145         Inherits Global.System.ComponentModel.Component
20146         
20147         Private _updateOrder As UpdateOrderOption
20148         
20149         Private _activationTableAdapter As ActivationTableAdapter
20150         
20151         Private _categoryTableAdapter As CategoryTableAdapter
20152         
20153         Private _dishTableAdapter As DishTableAdapter
20154         
20155         Private _hotelTableAdapter As HotelTableAdapter
20156         
20157         Private _inventoryTypeTableAdapter As InventoryTypeTableAdapter
20158         
20159         Private _kitchenTableAdapter As KitchenTableAdapter
20160         
20161         Private _kOTGenerationTableAdapter As KOTGenerationTableAdapter
20162         
20163         Private _kOTGenerationItemsTableAdapter As KOTGenerationItemsTableAdapter
20164         
20165         Private _logsTableAdapter As LogsTableAdapter
20166         
20167         Private _notesMasterTableAdapter As NotesMasterTableAdapter
20168         
20169         Private _pOSGroupingTableAdapter As POSGroupingTableAdapter
20170         
20171         Private _pOSPrinterSettingTableAdapter As POSPrinterSettingTableAdapter
20172         
20173         Private _r_TableTableAdapter As R_TableTableAdapter
20174         
20175         Private _registrationTableAdapter As RegistrationTableAdapter
20176         
20177         Private _restaurantBillingInfoTableAdapter As RestaurantBillingInfoTableAdapter
20178         
20179         Private _restaurantBillingItemsTableAdapter As RestaurantBillingItemsTableAdapter
20180         
20181         Private _backupDataSetBeforeUpdate As Boolean
20182         
20183         Private _connection As Global.System.Data.IDbConnection
20184         
20185         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20186          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
20187         Public Property UpdateOrder() As UpdateOrderOption
20188             Get
20189                 Return Me._updateOrder
20190             End Get
20191             Set
20192                 Me._updateOrder = value
20193             End Set
20194         End Property
20195         
20196         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20197          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20198          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20199             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20200             "a", "System.Drawing.Design.UITypeEditor")> _
20201         Public Property ActivationTableAdapter() As ActivationTableAdapter
20202             Get
20203                 Return Me._activationTableAdapter
20204             End Get
20205             Set
20206                 Me._activationTableAdapter = value
20207             End Set
20208         End Property
20209         
20210         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20211          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20212          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20213             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20214             "a", "System.Drawing.Design.UITypeEditor")> _
20215         Public Property CategoryTableAdapter() As CategoryTableAdapter
20216             Get
20217                 Return Me._categoryTableAdapter
20218             End Get
20219             Set
20220                 Me._categoryTableAdapter = value
20221             End Set
20222         End Property
20223         
20224         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20225          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20226          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20227             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20228             "a", "System.Drawing.Design.UITypeEditor")> _
20229         Public Property DishTableAdapter() As DishTableAdapter
20230             Get
20231                 Return Me._dishTableAdapter
20232             End Get
20233             Set
20234                 Me._dishTableAdapter = value
20235             End Set
20236         End Property
20237         
20238         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20239          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20240          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20241             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20242             "a", "System.Drawing.Design.UITypeEditor")> _
20243         Public Property HotelTableAdapter() As HotelTableAdapter
20244             Get
20245                 Return Me._hotelTableAdapter
20246             End Get
20247             Set
20248                 Me._hotelTableAdapter = value
20249             End Set
20250         End Property
20251         
20252         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20253          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20254          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20255             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20256             "a", "System.Drawing.Design.UITypeEditor")> _
20257         Public Property InventoryTypeTableAdapter() As InventoryTypeTableAdapter
20258             Get
20259                 Return Me._inventoryTypeTableAdapter
20260             End Get
20261             Set
20262                 Me._inventoryTypeTableAdapter = value
20263             End Set
20264         End Property
20265         
20266         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20267          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20268          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20269             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20270             "a", "System.Drawing.Design.UITypeEditor")> _
20271         Public Property KitchenTableAdapter() As KitchenTableAdapter
20272             Get
20273                 Return Me._kitchenTableAdapter
20274             End Get
20275             Set
20276                 Me._kitchenTableAdapter = value
20277             End Set
20278         End Property
20279         
20280         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20281          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20282          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20283             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20284             "a", "System.Drawing.Design.UITypeEditor")> _
20285         Public Property KOTGenerationTableAdapter() As KOTGenerationTableAdapter
20286             Get
20287                 Return Me._kOTGenerationTableAdapter
20288             End Get
20289             Set
20290                 Me._kOTGenerationTableAdapter = value
20291             End Set
20292         End Property
20293         
20294         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20295          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20296          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20297             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20298             "a", "System.Drawing.Design.UITypeEditor")> _
20299         Public Property KOTGenerationItemsTableAdapter() As KOTGenerationItemsTableAdapter
20300             Get
20301                 Return Me._kOTGenerationItemsTableAdapter
20302             End Get
20303             Set
20304                 Me._kOTGenerationItemsTableAdapter = value
20305             End Set
20306         End Property
20307         
20308         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20309          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20310          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20311             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20312             "a", "System.Drawing.Design.UITypeEditor")> _
20313         Public Property LogsTableAdapter() As LogsTableAdapter
20314             Get
20315                 Return Me._logsTableAdapter
20316             End Get
20317             Set
20318                 Me._logsTableAdapter = value
20319             End Set
20320         End Property
20321         
20322         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20323          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20324          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20325             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20326             "a", "System.Drawing.Design.UITypeEditor")> _
20327         Public Property NotesMasterTableAdapter() As NotesMasterTableAdapter
20328             Get
20329                 Return Me._notesMasterTableAdapter
20330             End Get
20331             Set
20332                 Me._notesMasterTableAdapter = value
20333             End Set
20334         End Property
20335         
20336         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20337          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20338          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20339             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20340             "a", "System.Drawing.Design.UITypeEditor")> _
20341         Public Property POSGroupingTableAdapter() As POSGroupingTableAdapter
20342             Get
20343                 Return Me._pOSGroupingTableAdapter
20344             End Get
20345             Set
20346                 Me._pOSGroupingTableAdapter = value
20347             End Set
20348         End Property
20349         
20350         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20351          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20352          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20353             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20354             "a", "System.Drawing.Design.UITypeEditor")> _
20355         Public Property POSPrinterSettingTableAdapter() As POSPrinterSettingTableAdapter
20356             Get
20357                 Return Me._pOSPrinterSettingTableAdapter
20358             End Get
20359             Set
20360                 Me._pOSPrinterSettingTableAdapter = value
20361             End Set
20362         End Property
20363         
20364         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20365          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20366          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20367             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20368             "a", "System.Drawing.Design.UITypeEditor")> _
20369         Public Property R_TableTableAdapter() As R_TableTableAdapter
20370             Get
20371                 Return Me._r_TableTableAdapter
20372             End Get
20373             Set
20374                 Me._r_TableTableAdapter = value
20375             End Set
20376         End Property
20377         
20378         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20379          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20380          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20381             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20382             "a", "System.Drawing.Design.UITypeEditor")> _
20383         Public Property RegistrationTableAdapter() As RegistrationTableAdapter
20384             Get
20385                 Return Me._registrationTableAdapter
20386             End Get
20387             Set
20388                 Me._registrationTableAdapter = value
20389             End Set
20390         End Property
20391         
20392         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20393          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20394          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20395             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20396             "a", "System.Drawing.Design.UITypeEditor")> _
20397         Public Property RestaurantBillingInfoTableAdapter() As RestaurantBillingInfoTableAdapter
20398             Get
20399                 Return Me._restaurantBillingInfoTableAdapter
20400             End Get
20401             Set
20402                 Me._restaurantBillingInfoTableAdapter = value
20403             End Set
20404         End Property
20405         
20406         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20407          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20408          Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
20409             "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
20410             "a", "System.Drawing.Design.UITypeEditor")> _
20411         Public Property RestaurantBillingItemsTableAdapter() As RestaurantBillingItemsTableAdapter
20412             Get
20413                 Return Me._restaurantBillingItemsTableAdapter
20414             End Get
20415             Set
20416                 Me._restaurantBillingItemsTableAdapter = value
20417             End Set
20418         End Property
20419         
20420         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20421          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
20422         Public Property BackupDataSetBeforeUpdate() As Boolean
20423             Get
20424                 Return Me._backupDataSetBeforeUpdate
20425             End Get
20426             Set
20427                 Me._backupDataSetBeforeUpdate = value
20428             End Set
20429         End Property
20430         
20431         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20432          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20433          Global.System.ComponentModel.Browsable(false)> _
20434         Public Property Connection() As Global.System.Data.IDbConnection
20435             Get
20436                 If (Not (Me._connection) Is Nothing) Then
20437                     Return Me._connection
20438                 End If
20439                 If ((Not (Me._activationTableAdapter) Is Nothing) _
20440                             AndAlso (Not (Me._activationTableAdapter.Connection) Is Nothing)) Then
20441                     Return Me._activationTableAdapter.Connection
20442                 End If
20443                 If ((Not (Me._categoryTableAdapter) Is Nothing) _
20444                             AndAlso (Not (Me._categoryTableAdapter.Connection) Is Nothing)) Then
20445                     Return Me._categoryTableAdapter.Connection
20446                 End If
20447                 If ((Not (Me._dishTableAdapter) Is Nothing) _
20448                             AndAlso (Not (Me._dishTableAdapter.Connection) Is Nothing)) Then
20449                     Return Me._dishTableAdapter.Connection
20450                 End If
20451                 If ((Not (Me._hotelTableAdapter) Is Nothing) _
20452                             AndAlso (Not (Me._hotelTableAdapter.Connection) Is Nothing)) Then
20453                     Return Me._hotelTableAdapter.Connection
20454                 End If
20455                 If ((Not (Me._inventoryTypeTableAdapter) Is Nothing) _
20456                             AndAlso (Not (Me._inventoryTypeTableAdapter.Connection) Is Nothing)) Then
20457                     Return Me._inventoryTypeTableAdapter.Connection
20458                 End If
20459                 If ((Not (Me._kitchenTableAdapter) Is Nothing) _
20460                             AndAlso (Not (Me._kitchenTableAdapter.Connection) Is Nothing)) Then
20461                     Return Me._kitchenTableAdapter.Connection
20462                 End If
20463                 If ((Not (Me._kOTGenerationTableAdapter) Is Nothing) _
20464                             AndAlso (Not (Me._kOTGenerationTableAdapter.Connection) Is Nothing)) Then
20465                     Return Me._kOTGenerationTableAdapter.Connection
20466                 End If
20467                 If ((Not (Me._kOTGenerationItemsTableAdapter) Is Nothing) _
20468                             AndAlso (Not (Me._kOTGenerationItemsTableAdapter.Connection) Is Nothing)) Then
20469                     Return Me._kOTGenerationItemsTableAdapter.Connection
20470                 End If
20471                 If ((Not (Me._logsTableAdapter) Is Nothing) _
20472                             AndAlso (Not (Me._logsTableAdapter.Connection) Is Nothing)) Then
20473                     Return Me._logsTableAdapter.Connection
20474                 End If
20475                 If ((Not (Me._notesMasterTableAdapter) Is Nothing) _
20476                             AndAlso (Not (Me._notesMasterTableAdapter.Connection) Is Nothing)) Then
20477                     Return Me._notesMasterTableAdapter.Connection
20478                 End If
20479                 If ((Not (Me._pOSGroupingTableAdapter) Is Nothing) _
20480                             AndAlso (Not (Me._pOSGroupingTableAdapter.Connection) Is Nothing)) Then
20481                     Return Me._pOSGroupingTableAdapter.Connection
20482                 End If
20483                 If ((Not (Me._pOSPrinterSettingTableAdapter) Is Nothing) _
20484                             AndAlso (Not (Me._pOSPrinterSettingTableAdapter.Connection) Is Nothing)) Then
20485                     Return Me._pOSPrinterSettingTableAdapter.Connection
20486                 End If
20487                 If ((Not (Me._r_TableTableAdapter) Is Nothing) _
20488                             AndAlso (Not (Me._r_TableTableAdapter.Connection) Is Nothing)) Then
20489                     Return Me._r_TableTableAdapter.Connection
20490                 End If
20491                 If ((Not (Me._registrationTableAdapter) Is Nothing) _
20492                             AndAlso (Not (Me._registrationTableAdapter.Connection) Is Nothing)) Then
20493                     Return Me._registrationTableAdapter.Connection
20494                 End If
20495                 If ((Not (Me._restaurantBillingInfoTableAdapter) Is Nothing) _
20496                             AndAlso (Not (Me._restaurantBillingInfoTableAdapter.Connection) Is Nothing)) Then
20497                     Return Me._restaurantBillingInfoTableAdapter.Connection
20498                 End If
20499                 If ((Not (Me._restaurantBillingItemsTableAdapter) Is Nothing) _
20500                             AndAlso (Not (Me._restaurantBillingItemsTableAdapter.Connection) Is Nothing)) Then
20501                     Return Me._restaurantBillingItemsTableAdapter.Connection
20502                 End If
20503                 Return Nothing
20504             End Get
20505             Set
20506                 Me._connection = value
20507             End Set
20508         End Property
20509         
20510         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20511          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
20512          Global.System.ComponentModel.Browsable(false)> _
20513         Public ReadOnly Property TableAdapterInstanceCount() As Integer
20514             Get
20515                 Dim count As Integer = 0
20516                 If (Not (Me._activationTableAdapter) Is Nothing) Then
20517                     count = (count + 1)
20518                 End If
20519                 If (Not (Me._categoryTableAdapter) Is Nothing) Then
20520                     count = (count + 1)
20521                 End If
20522                 If (Not (Me._dishTableAdapter) Is Nothing) Then
20523                     count = (count + 1)
20524                 End If
20525                 If (Not (Me._hotelTableAdapter) Is Nothing) Then
20526                     count = (count + 1)
20527                 End If
20528                 If (Not (Me._inventoryTypeTableAdapter) Is Nothing) Then
20529                     count = (count + 1)
20530                 End If
20531                 If (Not (Me._kitchenTableAdapter) Is Nothing) Then
20532                     count = (count + 1)
20533                 End If
20534                 If (Not (Me._kOTGenerationTableAdapter) Is Nothing) Then
20535                     count = (count + 1)
20536                 End If
20537                 If (Not (Me._kOTGenerationItemsTableAdapter) Is Nothing) Then
20538                     count = (count + 1)
20539                 End If
20540                 If (Not (Me._logsTableAdapter) Is Nothing) Then
20541                     count = (count + 1)
20542                 End If
20543                 If (Not (Me._notesMasterTableAdapter) Is Nothing) Then
20544                     count = (count + 1)
20545                 End If
20546                 If (Not (Me._pOSGroupingTableAdapter) Is Nothing) Then
20547                     count = (count + 1)
20548                 End If
20549                 If (Not (Me._pOSPrinterSettingTableAdapter) Is Nothing) Then
20550                     count = (count + 1)
20551                 End If
20552                 If (Not (Me._r_TableTableAdapter) Is Nothing) Then
20553                     count = (count + 1)
20554                 End If
20555                 If (Not (Me._registrationTableAdapter) Is Nothing) Then
20556                     count = (count + 1)
20557                 End If
20558                 If (Not (Me._restaurantBillingInfoTableAdapter) Is Nothing) Then
20559                     count = (count + 1)
20560                 End If
20561                 If (Not (Me._restaurantBillingItemsTableAdapter) Is Nothing) Then
20562                     count = (count + 1)
20563                 End If
20564                 Return count
20565             End Get
20566         End Property
20567         
20568         '''<summary>
20569         '''Update rows in top-down order.
20570         '''</summary>
20571         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20572          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
20573         Private Function UpdateUpdatedRows(ByVal dataSet As RPOS_DBDataSet, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow), ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
20574             Dim result As Integer = 0
20575             If (Not (Me._registrationTableAdapter) Is Nothing) Then
20576                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.Registration.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20577                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20578                 If ((Not (updatedRows) Is Nothing) _
20579                             AndAlso (0 < updatedRows.Length)) Then
20580                     result = (result + Me._registrationTableAdapter.Update(updatedRows))
20581                     allChangedRows.AddRange(updatedRows)
20582                 End If
20583             End If
20584             If (Not (Me._kitchenTableAdapter) Is Nothing) Then
20585                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.Kitchen.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20586                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20587                 If ((Not (updatedRows) Is Nothing) _
20588                             AndAlso (0 < updatedRows.Length)) Then
20589                     result = (result + Me._kitchenTableAdapter.Update(updatedRows))
20590                     allChangedRows.AddRange(updatedRows)
20591                 End If
20592             End If
20593             If (Not (Me._inventoryTypeTableAdapter) Is Nothing) Then
20594                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.InventoryType.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20595                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20596                 If ((Not (updatedRows) Is Nothing) _
20597                             AndAlso (0 < updatedRows.Length)) Then
20598                     result = (result + Me._inventoryTypeTableAdapter.Update(updatedRows))
20599                     allChangedRows.AddRange(updatedRows)
20600                 End If
20601             End If
20602             If (Not (Me._categoryTableAdapter) Is Nothing) Then
20603                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.Category.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20604                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20605                 If ((Not (updatedRows) Is Nothing) _
20606                             AndAlso (0 < updatedRows.Length)) Then
20607                     result = (result + Me._categoryTableAdapter.Update(updatedRows))
20608                     allChangedRows.AddRange(updatedRows)
20609                 End If
20610             End If
20611             If (Not (Me._kOTGenerationTableAdapter) Is Nothing) Then
20612                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.KOTGeneration.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20613                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20614                 If ((Not (updatedRows) Is Nothing) _
20615                             AndAlso (0 < updatedRows.Length)) Then
20616                     result = (result + Me._kOTGenerationTableAdapter.Update(updatedRows))
20617                     allChangedRows.AddRange(updatedRows)
20618                 End If
20619             End If
20620             If (Not (Me._dishTableAdapter) Is Nothing) Then
20621                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.Dish.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20622                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20623                 If ((Not (updatedRows) Is Nothing) _
20624                             AndAlso (0 < updatedRows.Length)) Then
20625                     result = (result + Me._dishTableAdapter.Update(updatedRows))
20626                     allChangedRows.AddRange(updatedRows)
20627                 End If
20628             End If
20629             If (Not (Me._restaurantBillingInfoTableAdapter) Is Nothing) Then
20630                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.RestaurantBillingInfo.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20631                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20632                 If ((Not (updatedRows) Is Nothing) _
20633                             AndAlso (0 < updatedRows.Length)) Then
20634                     result = (result + Me._restaurantBillingInfoTableAdapter.Update(updatedRows))
20635                     allChangedRows.AddRange(updatedRows)
20636                 End If
20637             End If
20638             If (Not (Me._r_TableTableAdapter) Is Nothing) Then
20639                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.R_Table.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20640                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20641                 If ((Not (updatedRows) Is Nothing) _
20642                             AndAlso (0 < updatedRows.Length)) Then
20643                     result = (result + Me._r_TableTableAdapter.Update(updatedRows))
20644                     allChangedRows.AddRange(updatedRows)
20645                 End If
20646             End If
20647             If (Not (Me._pOSPrinterSettingTableAdapter) Is Nothing) Then
20648                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.POSPrinterSetting.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20649                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20650                 If ((Not (updatedRows) Is Nothing) _
20651                             AndAlso (0 < updatedRows.Length)) Then
20652                     result = (result + Me._pOSPrinterSettingTableAdapter.Update(updatedRows))
20653                     allChangedRows.AddRange(updatedRows)
20654                 End If
20655             End If
20656             If (Not (Me._restaurantBillingItemsTableAdapter) Is Nothing) Then
20657                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.RestaurantBillingItems.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20658                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20659                 If ((Not (updatedRows) Is Nothing) _
20660                             AndAlso (0 < updatedRows.Length)) Then
20661                     result = (result + Me._restaurantBillingItemsTableAdapter.Update(updatedRows))
20662                     allChangedRows.AddRange(updatedRows)
20663                 End If
20664             End If
20665             If (Not (Me._pOSGroupingTableAdapter) Is Nothing) Then
20666                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.POSGrouping.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20667                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20668                 If ((Not (updatedRows) Is Nothing) _
20669                             AndAlso (0 < updatedRows.Length)) Then
20670                     result = (result + Me._pOSGroupingTableAdapter.Update(updatedRows))
20671                     allChangedRows.AddRange(updatedRows)
20672                 End If
20673             End If
20674             If (Not (Me._hotelTableAdapter) Is Nothing) Then
20675                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.Hotel.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20676                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20677                 If ((Not (updatedRows) Is Nothing) _
20678                             AndAlso (0 < updatedRows.Length)) Then
20679                     result = (result + Me._hotelTableAdapter.Update(updatedRows))
20680                     allChangedRows.AddRange(updatedRows)
20681                 End If
20682             End If
20683             If (Not (Me._activationTableAdapter) Is Nothing) Then
20684                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.Activation.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20685                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20686                 If ((Not (updatedRows) Is Nothing) _
20687                             AndAlso (0 < updatedRows.Length)) Then
20688                     result = (result + Me._activationTableAdapter.Update(updatedRows))
20689                     allChangedRows.AddRange(updatedRows)
20690                 End If
20691             End If
20692             If (Not (Me._kOTGenerationItemsTableAdapter) Is Nothing) Then
20693                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.KOTGenerationItems.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20694                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20695                 If ((Not (updatedRows) Is Nothing) _
20696                             AndAlso (0 < updatedRows.Length)) Then
20697                     result = (result + Me._kOTGenerationItemsTableAdapter.Update(updatedRows))
20698                     allChangedRows.AddRange(updatedRows)
20699                 End If
20700             End If
20701             If (Not (Me._notesMasterTableAdapter) Is Nothing) Then
20702                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.NotesMaster.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20703                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20704                 If ((Not (updatedRows) Is Nothing) _
20705                             AndAlso (0 < updatedRows.Length)) Then
20706                     result = (result + Me._notesMasterTableAdapter.Update(updatedRows))
20707                     allChangedRows.AddRange(updatedRows)
20708                 End If
20709             End If
20710             If (Not (Me._logsTableAdapter) Is Nothing) Then
20711                 Dim updatedRows() As Global.System.Data.DataRow = dataSet.Logs.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
20712                 updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
20713                 If ((Not (updatedRows) Is Nothing) _
20714                             AndAlso (0 < updatedRows.Length)) Then
20715                     result = (result + Me._logsTableAdapter.Update(updatedRows))
20716                     allChangedRows.AddRange(updatedRows)
20717                 End If
20718             End If
20719             Return result
20720         End Function
20721         
20722         '''<summary>
20723         '''Insert rows in top-down order.
20724         '''</summary>
20725         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20726          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
20727         Private Function UpdateInsertedRows(ByVal dataSet As RPOS_DBDataSet, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
20728             Dim result As Integer = 0
20729             If (Not (Me._registrationTableAdapter) Is Nothing) Then
20730                 Dim addedRows() As Global.System.Data.DataRow = dataSet.Registration.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20731                 If ((Not (addedRows) Is Nothing) _
20732                             AndAlso (0 < addedRows.Length)) Then
20733                     result = (result + Me._registrationTableAdapter.Update(addedRows))
20734                     allAddedRows.AddRange(addedRows)
20735                 End If
20736             End If
20737             If (Not (Me._kitchenTableAdapter) Is Nothing) Then
20738                 Dim addedRows() As Global.System.Data.DataRow = dataSet.Kitchen.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20739                 If ((Not (addedRows) Is Nothing) _
20740                             AndAlso (0 < addedRows.Length)) Then
20741                     result = (result + Me._kitchenTableAdapter.Update(addedRows))
20742                     allAddedRows.AddRange(addedRows)
20743                 End If
20744             End If
20745             If (Not (Me._inventoryTypeTableAdapter) Is Nothing) Then
20746                 Dim addedRows() As Global.System.Data.DataRow = dataSet.InventoryType.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20747                 If ((Not (addedRows) Is Nothing) _
20748                             AndAlso (0 < addedRows.Length)) Then
20749                     result = (result + Me._inventoryTypeTableAdapter.Update(addedRows))
20750                     allAddedRows.AddRange(addedRows)
20751                 End If
20752             End If
20753             If (Not (Me._categoryTableAdapter) Is Nothing) Then
20754                 Dim addedRows() As Global.System.Data.DataRow = dataSet.Category.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20755                 If ((Not (addedRows) Is Nothing) _
20756                             AndAlso (0 < addedRows.Length)) Then
20757                     result = (result + Me._categoryTableAdapter.Update(addedRows))
20758                     allAddedRows.AddRange(addedRows)
20759                 End If
20760             End If
20761             If (Not (Me._kOTGenerationTableAdapter) Is Nothing) Then
20762                 Dim addedRows() As Global.System.Data.DataRow = dataSet.KOTGeneration.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20763                 If ((Not (addedRows) Is Nothing) _
20764                             AndAlso (0 < addedRows.Length)) Then
20765                     result = (result + Me._kOTGenerationTableAdapter.Update(addedRows))
20766                     allAddedRows.AddRange(addedRows)
20767                 End If
20768             End If
20769             If (Not (Me._dishTableAdapter) Is Nothing) Then
20770                 Dim addedRows() As Global.System.Data.DataRow = dataSet.Dish.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20771                 If ((Not (addedRows) Is Nothing) _
20772                             AndAlso (0 < addedRows.Length)) Then
20773                     result = (result + Me._dishTableAdapter.Update(addedRows))
20774                     allAddedRows.AddRange(addedRows)
20775                 End If
20776             End If
20777             If (Not (Me._restaurantBillingInfoTableAdapter) Is Nothing) Then
20778                 Dim addedRows() As Global.System.Data.DataRow = dataSet.RestaurantBillingInfo.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20779                 If ((Not (addedRows) Is Nothing) _
20780                             AndAlso (0 < addedRows.Length)) Then
20781                     result = (result + Me._restaurantBillingInfoTableAdapter.Update(addedRows))
20782                     allAddedRows.AddRange(addedRows)
20783                 End If
20784             End If
20785             If (Not (Me._r_TableTableAdapter) Is Nothing) Then
20786                 Dim addedRows() As Global.System.Data.DataRow = dataSet.R_Table.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20787                 If ((Not (addedRows) Is Nothing) _
20788                             AndAlso (0 < addedRows.Length)) Then
20789                     result = (result + Me._r_TableTableAdapter.Update(addedRows))
20790                     allAddedRows.AddRange(addedRows)
20791                 End If
20792             End If
20793             If (Not (Me._pOSPrinterSettingTableAdapter) Is Nothing) Then
20794                 Dim addedRows() As Global.System.Data.DataRow = dataSet.POSPrinterSetting.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20795                 If ((Not (addedRows) Is Nothing) _
20796                             AndAlso (0 < addedRows.Length)) Then
20797                     result = (result + Me._pOSPrinterSettingTableAdapter.Update(addedRows))
20798                     allAddedRows.AddRange(addedRows)
20799                 End If
20800             End If
20801             If (Not (Me._restaurantBillingItemsTableAdapter) Is Nothing) Then
20802                 Dim addedRows() As Global.System.Data.DataRow = dataSet.RestaurantBillingItems.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20803                 If ((Not (addedRows) Is Nothing) _
20804                             AndAlso (0 < addedRows.Length)) Then
20805                     result = (result + Me._restaurantBillingItemsTableAdapter.Update(addedRows))
20806                     allAddedRows.AddRange(addedRows)
20807                 End If
20808             End If
20809             If (Not (Me._pOSGroupingTableAdapter) Is Nothing) Then
20810                 Dim addedRows() As Global.System.Data.DataRow = dataSet.POSGrouping.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20811                 If ((Not (addedRows) Is Nothing) _
20812                             AndAlso (0 < addedRows.Length)) Then
20813                     result = (result + Me._pOSGroupingTableAdapter.Update(addedRows))
20814                     allAddedRows.AddRange(addedRows)
20815                 End If
20816             End If
20817             If (Not (Me._hotelTableAdapter) Is Nothing) Then
20818                 Dim addedRows() As Global.System.Data.DataRow = dataSet.Hotel.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20819                 If ((Not (addedRows) Is Nothing) _
20820                             AndAlso (0 < addedRows.Length)) Then
20821                     result = (result + Me._hotelTableAdapter.Update(addedRows))
20822                     allAddedRows.AddRange(addedRows)
20823                 End If
20824             End If
20825             If (Not (Me._activationTableAdapter) Is Nothing) Then
20826                 Dim addedRows() As Global.System.Data.DataRow = dataSet.Activation.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20827                 If ((Not (addedRows) Is Nothing) _
20828                             AndAlso (0 < addedRows.Length)) Then
20829                     result = (result + Me._activationTableAdapter.Update(addedRows))
20830                     allAddedRows.AddRange(addedRows)
20831                 End If
20832             End If
20833             If (Not (Me._kOTGenerationItemsTableAdapter) Is Nothing) Then
20834                 Dim addedRows() As Global.System.Data.DataRow = dataSet.KOTGenerationItems.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20835                 If ((Not (addedRows) Is Nothing) _
20836                             AndAlso (0 < addedRows.Length)) Then
20837                     result = (result + Me._kOTGenerationItemsTableAdapter.Update(addedRows))
20838                     allAddedRows.AddRange(addedRows)
20839                 End If
20840             End If
20841             If (Not (Me._notesMasterTableAdapter) Is Nothing) Then
20842                 Dim addedRows() As Global.System.Data.DataRow = dataSet.NotesMaster.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20843                 If ((Not (addedRows) Is Nothing) _
20844                             AndAlso (0 < addedRows.Length)) Then
20845                     result = (result + Me._notesMasterTableAdapter.Update(addedRows))
20846                     allAddedRows.AddRange(addedRows)
20847                 End If
20848             End If
20849             If (Not (Me._logsTableAdapter) Is Nothing) Then
20850                 Dim addedRows() As Global.System.Data.DataRow = dataSet.Logs.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
20851                 If ((Not (addedRows) Is Nothing) _
20852                             AndAlso (0 < addedRows.Length)) Then
20853                     result = (result + Me._logsTableAdapter.Update(addedRows))
20854                     allAddedRows.AddRange(addedRows)
20855                 End If
20856             End If
20857             Return result
20858         End Function
20859         
20860         '''<summary>
20861         '''Delete rows in bottom-up order.
20862         '''</summary>
20863         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
20864          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
20865         Private Function UpdateDeletedRows(ByVal dataSet As RPOS_DBDataSet, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
20866             Dim result As Integer = 0
20867             If (Not (Me._logsTableAdapter) Is Nothing) Then
20868                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.Logs.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20869                 If ((Not (deletedRows) Is Nothing) _
20870                             AndAlso (0 < deletedRows.Length)) Then
20871                     result = (result + Me._logsTableAdapter.Update(deletedRows))
20872                     allChangedRows.AddRange(deletedRows)
20873                 End If
20874             End If
20875             If (Not (Me._notesMasterTableAdapter) Is Nothing) Then
20876                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.NotesMaster.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20877                 If ((Not (deletedRows) Is Nothing) _
20878                             AndAlso (0 < deletedRows.Length)) Then
20879                     result = (result + Me._notesMasterTableAdapter.Update(deletedRows))
20880                     allChangedRows.AddRange(deletedRows)
20881                 End If
20882             End If
20883             If (Not (Me._kOTGenerationItemsTableAdapter) Is Nothing) Then
20884                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.KOTGenerationItems.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20885                 If ((Not (deletedRows) Is Nothing) _
20886                             AndAlso (0 < deletedRows.Length)) Then
20887                     result = (result + Me._kOTGenerationItemsTableAdapter.Update(deletedRows))
20888                     allChangedRows.AddRange(deletedRows)
20889                 End If
20890             End If
20891             If (Not (Me._activationTableAdapter) Is Nothing) Then
20892                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.Activation.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20893                 If ((Not (deletedRows) Is Nothing) _
20894                             AndAlso (0 < deletedRows.Length)) Then
20895                     result = (result + Me._activationTableAdapter.Update(deletedRows))
20896                     allChangedRows.AddRange(deletedRows)
20897                 End If
20898             End If
20899             If (Not (Me._hotelTableAdapter) Is Nothing) Then
20900                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.Hotel.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20901                 If ((Not (deletedRows) Is Nothing) _
20902                             AndAlso (0 < deletedRows.Length)) Then
20903                     result = (result + Me._hotelTableAdapter.Update(deletedRows))
20904                     allChangedRows.AddRange(deletedRows)
20905                 End If
20906             End If
20907             If (Not (Me._pOSGroupingTableAdapter) Is Nothing) Then
20908                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.POSGrouping.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20909                 If ((Not (deletedRows) Is Nothing) _
20910                             AndAlso (0 < deletedRows.Length)) Then
20911                     result = (result + Me._pOSGroupingTableAdapter.Update(deletedRows))
20912                     allChangedRows.AddRange(deletedRows)
20913                 End If
20914             End If
20915             If (Not (Me._restaurantBillingItemsTableAdapter) Is Nothing) Then
20916                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.RestaurantBillingItems.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20917                 If ((Not (deletedRows) Is Nothing) _
20918                             AndAlso (0 < deletedRows.Length)) Then
20919                     result = (result + Me._restaurantBillingItemsTableAdapter.Update(deletedRows))
20920                     allChangedRows.AddRange(deletedRows)
20921                 End If
20922             End If
20923             If (Not (Me._pOSPrinterSettingTableAdapter) Is Nothing) Then
20924                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.POSPrinterSetting.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20925                 If ((Not (deletedRows) Is Nothing) _
20926                             AndAlso (0 < deletedRows.Length)) Then
20927                     result = (result + Me._pOSPrinterSettingTableAdapter.Update(deletedRows))
20928                     allChangedRows.AddRange(deletedRows)
20929                 End If
20930             End If
20931             If (Not (Me._r_TableTableAdapter) Is Nothing) Then
20932                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.R_Table.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20933                 If ((Not (deletedRows) Is Nothing) _
20934                             AndAlso (0 < deletedRows.Length)) Then
20935                     result = (result + Me._r_TableTableAdapter.Update(deletedRows))
20936                     allChangedRows.AddRange(deletedRows)
20937                 End If
20938             End If
20939             If (Not (Me._restaurantBillingInfoTableAdapter) Is Nothing) Then
20940                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.RestaurantBillingInfo.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20941                 If ((Not (deletedRows) Is Nothing) _
20942                             AndAlso (0 < deletedRows.Length)) Then
20943                     result = (result + Me._restaurantBillingInfoTableAdapter.Update(deletedRows))
20944                     allChangedRows.AddRange(deletedRows)
20945                 End If
20946             End If
20947             If (Not (Me._dishTableAdapter) Is Nothing) Then
20948                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.Dish.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20949                 If ((Not (deletedRows) Is Nothing) _
20950                             AndAlso (0 < deletedRows.Length)) Then
20951                     result = (result + Me._dishTableAdapter.Update(deletedRows))
20952                     allChangedRows.AddRange(deletedRows)
20953                 End If
20954             End If
20955             If (Not (Me._kOTGenerationTableAdapter) Is Nothing) Then
20956                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.KOTGeneration.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20957                 If ((Not (deletedRows) Is Nothing) _
20958                             AndAlso (0 < deletedRows.Length)) Then
20959                     result = (result + Me._kOTGenerationTableAdapter.Update(deletedRows))
20960                     allChangedRows.AddRange(deletedRows)
20961                 End If
20962             End If
20963             If (Not (Me._categoryTableAdapter) Is Nothing) Then
20964                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.Category.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20965                 If ((Not (deletedRows) Is Nothing) _
20966                             AndAlso (0 < deletedRows.Length)) Then
20967                     result = (result + Me._categoryTableAdapter.Update(deletedRows))
20968                     allChangedRows.AddRange(deletedRows)
20969                 End If
20970             End If
20971             If (Not (Me._inventoryTypeTableAdapter) Is Nothing) Then
20972                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.InventoryType.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20973                 If ((Not (deletedRows) Is Nothing) _
20974                             AndAlso (0 < deletedRows.Length)) Then
20975                     result = (result + Me._inventoryTypeTableAdapter.Update(deletedRows))
20976                     allChangedRows.AddRange(deletedRows)
20977                 End If
20978             End If
20979             If (Not (Me._kitchenTableAdapter) Is Nothing) Then
20980                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.Kitchen.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20981                 If ((Not (deletedRows) Is Nothing) _
20982                             AndAlso (0 < deletedRows.Length)) Then
20983                     result = (result + Me._kitchenTableAdapter.Update(deletedRows))
20984                     allChangedRows.AddRange(deletedRows)
20985                 End If
20986             End If
20987             If (Not (Me._registrationTableAdapter) Is Nothing) Then
20988                 Dim deletedRows() As Global.System.Data.DataRow = dataSet.Registration.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
20989                 If ((Not (deletedRows) Is Nothing) _
20990                             AndAlso (0 < deletedRows.Length)) Then
20991                     result = (result + Me._registrationTableAdapter.Update(deletedRows))
20992                     allChangedRows.AddRange(deletedRows)
20993                 End If
20994             End If
20995             Return result
20996         End Function
20997         
20998         '''<summary>
20999         '''Remove inserted rows that become updated rows after calling TableAdapter.Update(inserted rows) first
21000         '''</summary>
21001         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
21002          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
21003         Private Function GetRealUpdatedRows(ByVal updatedRows() As Global.System.Data.DataRow, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Global.System.Data.DataRow()
21004             If ((updatedRows Is Nothing) _
21005                         OrElse (updatedRows.Length < 1)) Then
21006                 Return updatedRows
21007             End If
21008             If ((allAddedRows Is Nothing) _
21009                         OrElse (allAddedRows.Count < 1)) Then
21010                 Return updatedRows
21011             End If
21012             Dim realUpdatedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow) = New Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)()
21013             Dim i As Integer = 0
21014             Do While (i < updatedRows.Length)
21015                 Dim row As Global.System.Data.DataRow = updatedRows(i)
21016                 If (allAddedRows.Contains(row) = false) Then
21017                     realUpdatedRows.Add(row)
21018                 End If
21019                 i = (i + 1)
21020             Loop
21021             Return realUpdatedRows.ToArray
21022         End Function
21023         
21024         '''<summary>
21025         '''Update all changes to the dataset.
21026         '''</summary>
21027         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
21028          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
21029         Public Overridable Function UpdateAll(ByVal dataSet As RPOS_DBDataSet) As Integer
21030             If (dataSet Is Nothing) Then
21031                 Throw New Global.System.ArgumentNullException("dataSet")
21032             End If
21033             If (dataSet.HasChanges = false) Then
21034                 Return 0
21035             End If
21036             If ((Not (Me._activationTableAdapter) Is Nothing) _
21037                         AndAlso (Me.MatchTableAdapterConnection(Me._activationTableAdapter.Connection) = false)) Then
21038                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21039                         "tring.")
21040             End If
21041             If ((Not (Me._categoryTableAdapter) Is Nothing) _
21042                         AndAlso (Me.MatchTableAdapterConnection(Me._categoryTableAdapter.Connection) = false)) Then
21043                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21044                         "tring.")
21045             End If
21046             If ((Not (Me._dishTableAdapter) Is Nothing) _
21047                         AndAlso (Me.MatchTableAdapterConnection(Me._dishTableAdapter.Connection) = false)) Then
21048                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21049                         "tring.")
21050             End If
21051             If ((Not (Me._hotelTableAdapter) Is Nothing) _
21052                         AndAlso (Me.MatchTableAdapterConnection(Me._hotelTableAdapter.Connection) = false)) Then
21053                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21054                         "tring.")
21055             End If
21056             If ((Not (Me._inventoryTypeTableAdapter) Is Nothing) _
21057                         AndAlso (Me.MatchTableAdapterConnection(Me._inventoryTypeTableAdapter.Connection) = false)) Then
21058                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21059                         "tring.")
21060             End If
21061             If ((Not (Me._kitchenTableAdapter) Is Nothing) _
21062                         AndAlso (Me.MatchTableAdapterConnection(Me._kitchenTableAdapter.Connection) = false)) Then
21063                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21064                         "tring.")
21065             End If
21066             If ((Not (Me._kOTGenerationTableAdapter) Is Nothing) _
21067                         AndAlso (Me.MatchTableAdapterConnection(Me._kOTGenerationTableAdapter.Connection) = false)) Then
21068                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21069                         "tring.")
21070             End If
21071             If ((Not (Me._kOTGenerationItemsTableAdapter) Is Nothing) _
21072                         AndAlso (Me.MatchTableAdapterConnection(Me._kOTGenerationItemsTableAdapter.Connection) = false)) Then
21073                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21074                         "tring.")
21075             End If
21076             If ((Not (Me._logsTableAdapter) Is Nothing) _
21077                         AndAlso (Me.MatchTableAdapterConnection(Me._logsTableAdapter.Connection) = false)) Then
21078                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21079                         "tring.")
21080             End If
21081             If ((Not (Me._notesMasterTableAdapter) Is Nothing) _
21082                         AndAlso (Me.MatchTableAdapterConnection(Me._notesMasterTableAdapter.Connection) = false)) Then
21083                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21084                         "tring.")
21085             End If
21086             If ((Not (Me._pOSGroupingTableAdapter) Is Nothing) _
21087                         AndAlso (Me.MatchTableAdapterConnection(Me._pOSGroupingTableAdapter.Connection) = false)) Then
21088                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21089                         "tring.")
21090             End If
21091             If ((Not (Me._pOSPrinterSettingTableAdapter) Is Nothing) _
21092                         AndAlso (Me.MatchTableAdapterConnection(Me._pOSPrinterSettingTableAdapter.Connection) = false)) Then
21093                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21094                         "tring.")
21095             End If
21096             If ((Not (Me._r_TableTableAdapter) Is Nothing) _
21097                         AndAlso (Me.MatchTableAdapterConnection(Me._r_TableTableAdapter.Connection) = false)) Then
21098                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21099                         "tring.")
21100             End If
21101             If ((Not (Me._registrationTableAdapter) Is Nothing) _
21102                         AndAlso (Me.MatchTableAdapterConnection(Me._registrationTableAdapter.Connection) = false)) Then
21103                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21104                         "tring.")
21105             End If
21106             If ((Not (Me._restaurantBillingInfoTableAdapter) Is Nothing) _
21107                         AndAlso (Me.MatchTableAdapterConnection(Me._restaurantBillingInfoTableAdapter.Connection) = false)) Then
21108                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21109                         "tring.")
21110             End If
21111             If ((Not (Me._restaurantBillingItemsTableAdapter) Is Nothing) _
21112                         AndAlso (Me.MatchTableAdapterConnection(Me._restaurantBillingItemsTableAdapter.Connection) = false)) Then
21113                 Throw New Global.System.ArgumentException("All TableAdapters managed by a TableAdapterManager must use the same connection s"& _
21114                         "tring.")
21115             End If
21116             Dim workConnection As Global.System.Data.IDbConnection = Me.Connection
21117             If (workConnection Is Nothing) Then
21118                 Throw New Global.System.ApplicationException("TableAdapterManager contains no connection information. Set each TableAdapterMana"& _
21119                         "ger TableAdapter property to a valid TableAdapter instance.")
21120             End If
21121             Dim workConnOpened As Boolean = false
21122             If ((workConnection.State And Global.System.Data.ConnectionState.Broken) _
21123                         = Global.System.Data.ConnectionState.Broken) Then
21124                 workConnection.Close
21125             End If
21126             If (workConnection.State = Global.System.Data.ConnectionState.Closed) Then
21127                 workConnection.Open
21128                 workConnOpened = true
21129             End If
21130             Dim workTransaction As Global.System.Data.IDbTransaction = workConnection.BeginTransaction
21131             If (workTransaction Is Nothing) Then
21132                 Throw New Global.System.ApplicationException("The transaction cannot begin. The current data connection does not support transa"& _
21133                         "ctions or the current state is not allowing the transaction to begin.")
21134             End If
21135             Dim allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow) = New Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)()
21136             Dim allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow) = New Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)()
21137             Dim adaptersWithAcceptChangesDuringUpdate As Global.System.Collections.Generic.List(Of Global.System.Data.Common.DataAdapter) = New Global.System.Collections.Generic.List(Of Global.System.Data.Common.DataAdapter)()
21138             Dim revertConnections As Global.System.Collections.Generic.Dictionary(Of Object, Global.System.Data.IDbConnection) = New Global.System.Collections.Generic.Dictionary(Of Object, Global.System.Data.IDbConnection)()
21139             Dim result As Integer = 0
21140             Dim backupDataSet As Global.System.Data.DataSet = Nothing
21141             If Me.BackupDataSetBeforeUpdate Then
21142                 backupDataSet = New Global.System.Data.DataSet()
21143                 backupDataSet.Merge(dataSet)
21144             End If
21145             Try
21146                 '---- Prepare for update -----------
21147                 '
21148                 If (Not (Me._activationTableAdapter) Is Nothing) Then
21149                     revertConnections.Add(Me._activationTableAdapter, Me._activationTableAdapter.Connection)
21150                     Me._activationTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21151                     Me._activationTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21152                     If Me._activationTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21153                         Me._activationTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21154                         adaptersWithAcceptChangesDuringUpdate.Add(Me._activationTableAdapter.Adapter)
21155                     End If
21156                 End If
21157                 If (Not (Me._categoryTableAdapter) Is Nothing) Then
21158                     revertConnections.Add(Me._categoryTableAdapter, Me._categoryTableAdapter.Connection)
21159                     Me._categoryTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21160                     Me._categoryTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21161                     If Me._categoryTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21162                         Me._categoryTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21163                         adaptersWithAcceptChangesDuringUpdate.Add(Me._categoryTableAdapter.Adapter)
21164                     End If
21165                 End If
21166                 If (Not (Me._dishTableAdapter) Is Nothing) Then
21167                     revertConnections.Add(Me._dishTableAdapter, Me._dishTableAdapter.Connection)
21168                     Me._dishTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21169                     Me._dishTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21170                     If Me._dishTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21171                         Me._dishTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21172                         adaptersWithAcceptChangesDuringUpdate.Add(Me._dishTableAdapter.Adapter)
21173                     End If
21174                 End If
21175                 If (Not (Me._hotelTableAdapter) Is Nothing) Then
21176                     revertConnections.Add(Me._hotelTableAdapter, Me._hotelTableAdapter.Connection)
21177                     Me._hotelTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21178                     Me._hotelTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21179                     If Me._hotelTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21180                         Me._hotelTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21181                         adaptersWithAcceptChangesDuringUpdate.Add(Me._hotelTableAdapter.Adapter)
21182                     End If
21183                 End If
21184                 If (Not (Me._inventoryTypeTableAdapter) Is Nothing) Then
21185                     revertConnections.Add(Me._inventoryTypeTableAdapter, Me._inventoryTypeTableAdapter.Connection)
21186                     Me._inventoryTypeTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21187                     Me._inventoryTypeTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21188                     If Me._inventoryTypeTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21189                         Me._inventoryTypeTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21190                         adaptersWithAcceptChangesDuringUpdate.Add(Me._inventoryTypeTableAdapter.Adapter)
21191                     End If
21192                 End If
21193                 If (Not (Me._kitchenTableAdapter) Is Nothing) Then
21194                     revertConnections.Add(Me._kitchenTableAdapter, Me._kitchenTableAdapter.Connection)
21195                     Me._kitchenTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21196                     Me._kitchenTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21197                     If Me._kitchenTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21198                         Me._kitchenTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21199                         adaptersWithAcceptChangesDuringUpdate.Add(Me._kitchenTableAdapter.Adapter)
21200                     End If
21201                 End If
21202                 If (Not (Me._kOTGenerationTableAdapter) Is Nothing) Then
21203                     revertConnections.Add(Me._kOTGenerationTableAdapter, Me._kOTGenerationTableAdapter.Connection)
21204                     Me._kOTGenerationTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21205                     Me._kOTGenerationTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21206                     If Me._kOTGenerationTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21207                         Me._kOTGenerationTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21208                         adaptersWithAcceptChangesDuringUpdate.Add(Me._kOTGenerationTableAdapter.Adapter)
21209                     End If
21210                 End If
21211                 If (Not (Me._kOTGenerationItemsTableAdapter) Is Nothing) Then
21212                     revertConnections.Add(Me._kOTGenerationItemsTableAdapter, Me._kOTGenerationItemsTableAdapter.Connection)
21213                     Me._kOTGenerationItemsTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21214                     Me._kOTGenerationItemsTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21215                     If Me._kOTGenerationItemsTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21216                         Me._kOTGenerationItemsTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21217                         adaptersWithAcceptChangesDuringUpdate.Add(Me._kOTGenerationItemsTableAdapter.Adapter)
21218                     End If
21219                 End If
21220                 If (Not (Me._logsTableAdapter) Is Nothing) Then
21221                     revertConnections.Add(Me._logsTableAdapter, Me._logsTableAdapter.Connection)
21222                     Me._logsTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21223                     Me._logsTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21224                     If Me._logsTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21225                         Me._logsTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21226                         adaptersWithAcceptChangesDuringUpdate.Add(Me._logsTableAdapter.Adapter)
21227                     End If
21228                 End If
21229                 If (Not (Me._notesMasterTableAdapter) Is Nothing) Then
21230                     revertConnections.Add(Me._notesMasterTableAdapter, Me._notesMasterTableAdapter.Connection)
21231                     Me._notesMasterTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21232                     Me._notesMasterTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21233                     If Me._notesMasterTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21234                         Me._notesMasterTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21235                         adaptersWithAcceptChangesDuringUpdate.Add(Me._notesMasterTableAdapter.Adapter)
21236                     End If
21237                 End If
21238                 If (Not (Me._pOSGroupingTableAdapter) Is Nothing) Then
21239                     revertConnections.Add(Me._pOSGroupingTableAdapter, Me._pOSGroupingTableAdapter.Connection)
21240                     Me._pOSGroupingTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21241                     Me._pOSGroupingTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21242                     If Me._pOSGroupingTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21243                         Me._pOSGroupingTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21244                         adaptersWithAcceptChangesDuringUpdate.Add(Me._pOSGroupingTableAdapter.Adapter)
21245                     End If
21246                 End If
21247                 If (Not (Me._pOSPrinterSettingTableAdapter) Is Nothing) Then
21248                     revertConnections.Add(Me._pOSPrinterSettingTableAdapter, Me._pOSPrinterSettingTableAdapter.Connection)
21249                     Me._pOSPrinterSettingTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21250                     Me._pOSPrinterSettingTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21251                     If Me._pOSPrinterSettingTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21252                         Me._pOSPrinterSettingTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21253                         adaptersWithAcceptChangesDuringUpdate.Add(Me._pOSPrinterSettingTableAdapter.Adapter)
21254                     End If
21255                 End If
21256                 If (Not (Me._r_TableTableAdapter) Is Nothing) Then
21257                     revertConnections.Add(Me._r_TableTableAdapter, Me._r_TableTableAdapter.Connection)
21258                     Me._r_TableTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21259                     Me._r_TableTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21260                     If Me._r_TableTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21261                         Me._r_TableTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21262                         adaptersWithAcceptChangesDuringUpdate.Add(Me._r_TableTableAdapter.Adapter)
21263                     End If
21264                 End If
21265                 If (Not (Me._registrationTableAdapter) Is Nothing) Then
21266                     revertConnections.Add(Me._registrationTableAdapter, Me._registrationTableAdapter.Connection)
21267                     Me._registrationTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21268                     Me._registrationTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21269                     If Me._registrationTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21270                         Me._registrationTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21271                         adaptersWithAcceptChangesDuringUpdate.Add(Me._registrationTableAdapter.Adapter)
21272                     End If
21273                 End If
21274                 If (Not (Me._restaurantBillingInfoTableAdapter) Is Nothing) Then
21275                     revertConnections.Add(Me._restaurantBillingInfoTableAdapter, Me._restaurantBillingInfoTableAdapter.Connection)
21276                     Me._restaurantBillingInfoTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21277                     Me._restaurantBillingInfoTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21278                     If Me._restaurantBillingInfoTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21279                         Me._restaurantBillingInfoTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21280                         adaptersWithAcceptChangesDuringUpdate.Add(Me._restaurantBillingInfoTableAdapter.Adapter)
21281                     End If
21282                 End If
21283                 If (Not (Me._restaurantBillingItemsTableAdapter) Is Nothing) Then
21284                     revertConnections.Add(Me._restaurantBillingItemsTableAdapter, Me._restaurantBillingItemsTableAdapter.Connection)
21285                     Me._restaurantBillingItemsTableAdapter.Connection = CType(workConnection,Global.System.Data.OleDb.OleDbConnection)
21286                     Me._restaurantBillingItemsTableAdapter.Transaction = CType(workTransaction,Global.System.Data.OleDb.OleDbTransaction)
21287                     If Me._restaurantBillingItemsTableAdapter.Adapter.AcceptChangesDuringUpdate Then
21288                         Me._restaurantBillingItemsTableAdapter.Adapter.AcceptChangesDuringUpdate = false
21289                         adaptersWithAcceptChangesDuringUpdate.Add(Me._restaurantBillingItemsTableAdapter.Adapter)
21290                     End If
21291                 End If
21292                 '
21293                 '---- Perform updates -----------
21294                 '
21295                 If (Me.UpdateOrder = UpdateOrderOption.UpdateInsertDelete) Then
21296                     result = (result + Me.UpdateUpdatedRows(dataSet, allChangedRows, allAddedRows))
21297                     result = (result + Me.UpdateInsertedRows(dataSet, allAddedRows))
21298                 Else
21299                     result = (result + Me.UpdateInsertedRows(dataSet, allAddedRows))
21300                     result = (result + Me.UpdateUpdatedRows(dataSet, allChangedRows, allAddedRows))
21301                 End If
21302                 result = (result + Me.UpdateDeletedRows(dataSet, allChangedRows))
21303                 '
21304                 '---- Commit updates -----------
21305                 '
21306                 workTransaction.Commit
21307                 If (0 < allAddedRows.Count) Then
21308                     Dim rows((allAddedRows.Count) - 1) As Global.System.Data.DataRow
21309                     allAddedRows.CopyTo(rows)
21310                     Dim i As Integer = 0
21311                     Do While (i < rows.Length)
21312                         Dim row As Global.System.Data.DataRow = rows(i)
21313                         row.AcceptChanges
21314                         i = (i + 1)
21315                     Loop
21316                 End If
21317                 If (0 < allChangedRows.Count) Then
21318                     Dim rows((allChangedRows.Count) - 1) As Global.System.Data.DataRow
21319                     allChangedRows.CopyTo(rows)
21320                     Dim i As Integer = 0
21321                     Do While (i < rows.Length)
21322                         Dim row As Global.System.Data.DataRow = rows(i)
21323                         row.AcceptChanges
21324                         i = (i + 1)
21325                     Loop
21326                 End If
21327             Catch ex As Global.System.Exception
21328                 workTransaction.Rollback
21329                 '---- Restore the dataset -----------
21330                 If Me.BackupDataSetBeforeUpdate Then
21331                     Global.System.Diagnostics.Debug.Assert((Not (backupDataSet) Is Nothing))
21332                     dataSet.Clear
21333                     dataSet.Merge(backupDataSet)
21334                 Else
21335                     If (0 < allAddedRows.Count) Then
21336                         Dim rows((allAddedRows.Count) - 1) As Global.System.Data.DataRow
21337                         allAddedRows.CopyTo(rows)
21338                         Dim i As Integer = 0
21339                         Do While (i < rows.Length)
21340                             Dim row As Global.System.Data.DataRow = rows(i)
21341                             row.AcceptChanges
21342                             row.SetAdded
21343                             i = (i + 1)
21344                         Loop
21345                     End If
21346                 End If
21347                 Throw ex
21348             Finally
21349                 If workConnOpened Then
21350                     workConnection.Close
21351                 End If
21352                 If (Not (Me._activationTableAdapter) Is Nothing) Then
21353                     Me._activationTableAdapter.Connection = CType(revertConnections(Me._activationTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21354                     Me._activationTableAdapter.Transaction = Nothing
21355                 End If
21356                 If (Not (Me._categoryTableAdapter) Is Nothing) Then
21357                     Me._categoryTableAdapter.Connection = CType(revertConnections(Me._categoryTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21358                     Me._categoryTableAdapter.Transaction = Nothing
21359                 End If
21360                 If (Not (Me._dishTableAdapter) Is Nothing) Then
21361                     Me._dishTableAdapter.Connection = CType(revertConnections(Me._dishTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21362                     Me._dishTableAdapter.Transaction = Nothing
21363                 End If
21364                 If (Not (Me._hotelTableAdapter) Is Nothing) Then
21365                     Me._hotelTableAdapter.Connection = CType(revertConnections(Me._hotelTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21366                     Me._hotelTableAdapter.Transaction = Nothing
21367                 End If
21368                 If (Not (Me._inventoryTypeTableAdapter) Is Nothing) Then
21369                     Me._inventoryTypeTableAdapter.Connection = CType(revertConnections(Me._inventoryTypeTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21370                     Me._inventoryTypeTableAdapter.Transaction = Nothing
21371                 End If
21372                 If (Not (Me._kitchenTableAdapter) Is Nothing) Then
21373                     Me._kitchenTableAdapter.Connection = CType(revertConnections(Me._kitchenTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21374                     Me._kitchenTableAdapter.Transaction = Nothing
21375                 End If
21376                 If (Not (Me._kOTGenerationTableAdapter) Is Nothing) Then
21377                     Me._kOTGenerationTableAdapter.Connection = CType(revertConnections(Me._kOTGenerationTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21378                     Me._kOTGenerationTableAdapter.Transaction = Nothing
21379                 End If
21380                 If (Not (Me._kOTGenerationItemsTableAdapter) Is Nothing) Then
21381                     Me._kOTGenerationItemsTableAdapter.Connection = CType(revertConnections(Me._kOTGenerationItemsTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21382                     Me._kOTGenerationItemsTableAdapter.Transaction = Nothing
21383                 End If
21384                 If (Not (Me._logsTableAdapter) Is Nothing) Then
21385                     Me._logsTableAdapter.Connection = CType(revertConnections(Me._logsTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21386                     Me._logsTableAdapter.Transaction = Nothing
21387                 End If
21388                 If (Not (Me._notesMasterTableAdapter) Is Nothing) Then
21389                     Me._notesMasterTableAdapter.Connection = CType(revertConnections(Me._notesMasterTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21390                     Me._notesMasterTableAdapter.Transaction = Nothing
21391                 End If
21392                 If (Not (Me._pOSGroupingTableAdapter) Is Nothing) Then
21393                     Me._pOSGroupingTableAdapter.Connection = CType(revertConnections(Me._pOSGroupingTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21394                     Me._pOSGroupingTableAdapter.Transaction = Nothing
21395                 End If
21396                 If (Not (Me._pOSPrinterSettingTableAdapter) Is Nothing) Then
21397                     Me._pOSPrinterSettingTableAdapter.Connection = CType(revertConnections(Me._pOSPrinterSettingTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21398                     Me._pOSPrinterSettingTableAdapter.Transaction = Nothing
21399                 End If
21400                 If (Not (Me._r_TableTableAdapter) Is Nothing) Then
21401                     Me._r_TableTableAdapter.Connection = CType(revertConnections(Me._r_TableTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21402                     Me._r_TableTableAdapter.Transaction = Nothing
21403                 End If
21404                 If (Not (Me._registrationTableAdapter) Is Nothing) Then
21405                     Me._registrationTableAdapter.Connection = CType(revertConnections(Me._registrationTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21406                     Me._registrationTableAdapter.Transaction = Nothing
21407                 End If
21408                 If (Not (Me._restaurantBillingInfoTableAdapter) Is Nothing) Then
21409                     Me._restaurantBillingInfoTableAdapter.Connection = CType(revertConnections(Me._restaurantBillingInfoTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21410                     Me._restaurantBillingInfoTableAdapter.Transaction = Nothing
21411                 End If
21412                 If (Not (Me._restaurantBillingItemsTableAdapter) Is Nothing) Then
21413                     Me._restaurantBillingItemsTableAdapter.Connection = CType(revertConnections(Me._restaurantBillingItemsTableAdapter),Global.System.Data.OleDb.OleDbConnection)
21414                     Me._restaurantBillingItemsTableAdapter.Transaction = Nothing
21415                 End If
21416                 If (0 < adaptersWithAcceptChangesDuringUpdate.Count) Then
21417                     Dim adapters((adaptersWithAcceptChangesDuringUpdate.Count) - 1) As Global.System.Data.Common.DataAdapter
21418                     adaptersWithAcceptChangesDuringUpdate.CopyTo(adapters)
21419                     Dim i As Integer = 0
21420                     Do While (i < adapters.Length)
21421                         Dim adapter As Global.System.Data.Common.DataAdapter = adapters(i)
21422                         adapter.AcceptChangesDuringUpdate = true
21423                         i = (i + 1)
21424                     Loop
21425                 End If
21426             End Try
21427             Return result
21428         End Function
21429         
21430         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
21431          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
21432         Protected Overridable Sub SortSelfReferenceRows(ByVal rows() As Global.System.Data.DataRow, ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
21433             Global.System.Array.Sort(Of Global.System.Data.DataRow)(rows, New SelfReferenceComparer(relation, childFirst))
21434         End Sub
21435         
21436         <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
21437          Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
21438         Protected Overridable Function MatchTableAdapterConnection(ByVal inputConnection As Global.System.Data.IDbConnection) As Boolean
21439             If (Not (Me._connection) Is Nothing) Then
21440                 Return true
21441             End If
21442             If ((Me.Connection Is Nothing) _
21443                         OrElse (inputConnection Is Nothing)) Then
21444                 Return true
21445             End If
21446             If String.Equals(Me.Connection.ConnectionString, inputConnection.ConnectionString, Global.System.StringComparison.Ordinal) Then
21447                 Return true
21448             End If
21449             Return false
21450         End Function
21451         
21452         '''<summary>
21453         '''Update Order Option
21454         '''</summary>
21455         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
21456         Public Enum UpdateOrderOption
21457             
21458             InsertUpdateDelete = 0
21459             
21460             UpdateInsertDelete = 1
21461         End Enum
21462         
21463         '''<summary>
21464         '''Used to sort self-referenced table's rows
21465         '''</summary>
21466         <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
21467         Private Class SelfReferenceComparer
21468             Inherits Object
21469             Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow)
21470             
21471             Private _relation As Global.System.Data.DataRelation
21472             
21473             Private _childFirst As Integer
21474             
21475             <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
21476              Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
21477             Friend Sub New(ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
21478                 MyBase.New
21479                 Me._relation = relation
21480                 If childFirst Then
21481                     Me._childFirst = -1
21482                 Else
21483                     Me._childFirst = 1
21484                 End If
21485             End Sub
21486             
21487             <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
21488              Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
21489             Private Function GetRoot(ByVal row As Global.System.Data.DataRow, ByRef distance As Integer) As Global.System.Data.DataRow
21490                 Global.System.Diagnostics.Debug.Assert((Not (row) Is Nothing))
21491                 Dim root As Global.System.Data.DataRow = row
21492                 distance = 0
21493
21494                 Dim traversedRows As Global.System.Collections.Generic.IDictionary(Of Global.System.Data.DataRow, Global.System.Data.DataRow) = New Global.System.Collections.Generic.Dictionary(Of Global.System.Data.DataRow, Global.System.Data.DataRow)()
21495                 traversedRows(row) = row
21496
21497                 Dim parent As Global.System.Data.DataRow = row.GetParentRow(Me._relation, Global.System.Data.DataRowVersion.[Default])
21498
21499                 Do While ((Not (parent) Is Nothing) _
21500                             AndAlso (traversedRows.ContainsKey(parent) = false))
21501                     distance = (distance + 1)
21502                     root = parent
21503                     traversedRows(parent) = parent
21504                     parent = parent.GetParentRow(Me._relation, Global.System.Data.DataRowVersion.[Default])
21505
21506                 Loop
21507
21508                 If (distance = 0) Then
21509                     traversedRows.Clear
21510                     traversedRows(row) = row
21511                     parent = row.GetParentRow(Me._relation, Global.System.Data.DataRowVersion.Original)
21512
21513                     Do While ((Not (parent) Is Nothing) _
21514                                 AndAlso (traversedRows.ContainsKey(parent) = false))
21515                         distance = (distance + 1)
21516                         root = parent
21517                         traversedRows(parent) = parent
21518                         parent = parent.GetParentRow(Me._relation, Global.System.Data.DataRowVersion.Original)
21519
21520                     Loop
21521                 End If
21522
21523                 Return root
21524             End Function
21525             
21526             <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
21527              Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
21528             Public Function Compare(ByVal row1 As Global.System.Data.DataRow, ByVal row2 As Global.System.Data.DataRow) As Integer Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow).Compare
21529                 If Object.ReferenceEquals(row1, row2) Then
21530                     Return 0
21531                 End If
21532                 If (row1 Is Nothing) Then
21533                     Return -1
21534                 End If
21535                 If (row2 Is Nothing) Then
21536                     Return 1
21537                 End If
21538
21539                 Dim distance1 As Integer = 0
21540                 Dim root1 As Global.System.Data.DataRow = Me.GetRoot(row1, distance1)
21541
21542                 Dim distance2 As Integer = 0
21543                 Dim root2 As Global.System.Data.DataRow = Me.GetRoot(row2, distance2)
21544
21545                 If Object.ReferenceEquals(root1, root2) Then
21546                     Return (Me._childFirst * distance1.CompareTo(distance2))
21547                 Else
21548                     Global.System.Diagnostics.Debug.Assert(((Not (root1.Table) Is Nothing) _
21549                                     AndAlso (Not (root2.Table) Is Nothing)))
21550                     If (root1.Table.Rows.IndexOf(root1) < root2.Table.Rows.IndexOf(root2)) Then
21551                         Return -1
21552                     Else
21553                         Return 1
21554                     End If
21555                 End If
21556             End Function
21557         End Class
21558     End Class
21559 End Namespace